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PREFACE 



The main objective of the Fortran prograpuning units is to d©~ 
velop Ihe necesaat^y jskills to / 



(i) translate a problem. statement to a ptogramming problem 

'* > 

statement; 

(ii) develop a debugged program that obtains a 'Vorkable" 
solution for the original problem; ^ . 
(ill) prep^e a description of the prograii\ so that others may 
mal<(e use of the program, or the author may use the pro- 
. gram at a later dat<? with a minimum Investment in time: 
(Iv) accomplish the previous three skills with, reaso«abl© 
degrees of efficiency.* - ^ 

To accomplish' <i) and- (ii) it is necessary to learn q, computer 
programming language ^ind to practice the translation phase fov a 
variety of problems. Preparing pirogram descriptions and develop- 
ing efficiency will be emphasized at each step. Several program® , 
will be written that may be uaed as problem solving tools in sub-*" 
sequent coursea, 

A programming language is a language used to describe an algo- 

rithm, that ia, a procedure for solving a problem, in such a way 

i ' . ' ■ . 

that a computer c^ti Interpret th© 'algorithm and can carry out each 

of the .s4)©ps prescribed by the algorithm. Programming lAJiguagea 

vary in complexity. In general the languages that ate easiest for 



th© fliachine to uee require considerable kncj^ledge of the computer 
pn the programmer's part. On the other hand, languages th«t am 
easiest for the profeVammer to use generally require the computer 
to tranalate the program from the -source language to machfne lan- 
guage. The translation process from source language to .machine or 
object language^ is a task that computers do reasonably well; con-* 
sequ^ntly^ most of the programs written. today are- written In so« 
called "higher level" programming languages, which- invoke the com- 
puter to tran.4late as well aa to compute. ' ' ' 

Fortran (an acronym obtained from formula trans lator) is an 
example of a hlghet level programming language.. It is the most 
wide-ly u6ed programming langttage for scientific applications. 
There are many variations or dialects of Fortran. Ydu should be 
aware that different computer manufacturers support different 
dialects, one manufacturer may support different dialects, and 
users may create their own dialects. In ordejr to be able to move ■ 

# ■ 

programs from one computer Installation to another^ it is oacessary 

to have^^^a wet of standards. Appendix I gives comparisons between 

USA stanAlard Fortran 'and .other available Fortran©. The USAS BASIC 

Fortran is a subset bf USAS FULL Fortran. It is likely that :you 

will fliscover useful features bf some of the compilers that are 

not included In usfe Fortran. If you ua6 those features, you do 

so "at your own risk." Some\eatur^s not included ii? USAS Fortran ■< 

are very desirable; consequently, if it is unlikely that the pro- 
■ ' ' ■ . ' ' , 

gram will have to be run on different computers, It is wortht^hi^e 

. .■ ^ 

to make us© of those features* On the othar hand, If a pro|5ram i^ 

. 

tc^ b© run at several. different computer installations, only those 

r ^ » •* ' , 

i 

ii . ■ 



features listiad In USAS Fortran should used. 

Thite^is an example of one of many possibl© cholc4^8 you may ' 
makft while completing the computer science units .'y Other decisions 
will , be required to 'get a program to "work," to transform a work- 
ing program to an efficient program, tg "tune" a prograi)i. etc. 'An 
aspect of computli\affmany find challenging is that, in general,, the r 
is fto best way to attack a new problem. ' You will find this to be 
true in some of the programs you attempt to davelop. 

Otheir higher level .programming languages in widespread use *- 

# * . 

are listed below. , 

Cobol * a buainess language . • 

^ ^ report generator used primarily for business 

applic!^ionB 

PL/ I combines features of Algol, Fortran and Cobol 

^ Algol a scientific language 

Basic a version of Fortran used in conjunction with- 
typewriter like terminals ' 

/ 

APL ,a mathematical language v " . / 

J ' ' ' 

Assembler a form of machine language 

9 

Several Undergraduate and graduate courses make use o^ these and 
other programming languages.. Translate^ of varying sophistica- 
tiorl are reqi^re'T^ convert programs ^rom thes^ source languages 
to machine language* V . . , 

Take some time to examine the organisation of this book." 
Th© instructional materials are organized into units in the text.. 
Each unit contains a d^criptive title, a rationale explaining, the 
purpose for including the ma^er^Ul In the unlt»- th^ bihavior^l 

' ■ ill • 



objective that , states what you will be able to perform after you 
have mastered the material in the , unit , . prerequisites for the unit, 
a series of activitiea designesd to point you- in the' direction of 
the objective and help you attain itr, some self evaluation piatferl- 
als sp that" you can assess for yourself whether you have attaj,ned. 
the objective, aHsessment tasks with which you demonstrate to your „ 

instructor tKat you have 'at tain©4 the olije'ctiva, W finally in^^ ^ 

atructions telling you what to do next. 

The book, also Contains a rather e;nten8lve set of appendices, 
^ Read the titles of the appendices in the Table of Contents, and 

thumb through them. They contain a great deal of practical infer-* • . ' 
^( raation that you will need throughout the course-,, « Particularly at 
this time" be aware of the appendix cotUainlng th'e glossary of terms. 
If terms which you do not undersjtand appear in the text, look for 
them in the glossary. If there are omitted terms Which^ you think 
should be included in the glossary, writ-e them down and give them . ' - 

to your instructor- 

* ■ o 

/ 

The page numbers in the text are designed to be used -for quick' 
. * referencing. The first number is the unit number, and the second 
numbear numbers the page in sequence in tfiat unit.' For exataple, 
page 8.3 la page 3 or Unit 8. Appendices are numbered similarly 
except that Roman numerals are used. For- example, page V.2 is page 
2 of Appendix V. - - 

the cover of the book shows the sequence of units 'for' the 
course In the fotm of a flow chart (discu$sed further in Unit 2)o 

This fl6w diart will h^lp y^u to assess your progress toward this 
A * . ■ - # 

^tenninal unit. 
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Unit 1 requires a card i*eader with optical mark r@ad (OM) 
capability. It" this feature is not available, then Unit 1 may be 
omitted without disturbing the sequence of the material. 



» « 



i 



^ ' TABLE OF CONTENTS 

\ •.. , 

Unit 

1# Becoming Acquainted With the Computer 

# p 
* * • 

2* Flowcharts 

3. Variables, Constants, fexpresaiona ,ap4 Assignment Statements 

' = - ^ - . , ■ - V 

4. Statement Niyubera and^ Unconditional Blanches 

5/ Preparing a Job for Running on the Computer 
6. Jnput and Output , 

8, Condltipnal Branching or Transfer Statemants 

9. Arrays and Subscripted Variables 
10. Lobps / 

ly. Input, Output, Formats 

L 

12» .Arithmetic Concepts * 

13. Subprograms 

14, Debugging : ' 
16% Computer Concepts ^ - 

17. General Fortran Programs 

Units i\l and //IS are omitted^ ^ 
» 

APPENDIX^. Cotnparlaons of Various Fortran Implementations 

APPENDIX II ! ' Coinpu(;er Science Glosairt«-y ' * 

APPENDIX III. Running a WATFIV Job on the IBM Syst^in/360 Model 
. 65 User Terminal * 

APPENDIX IV, Additional Instructions for Operating t,he IBM 2501 
Card Reader , * ' ■ 

APPENDIX V. Instructions for Using the IBM 1403 Printer • 

APPENDIX VI » How to. Get an 80/80 Listing With, the §yst©in/360* 
User Tem^nal 
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APPENDIXWII. 
APPENDIX VIII, 



Running Fortran Jobs oi 
User Terminal WATFIV 



APPENDIX IX, Activities Tables 
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\ .UNIT //X (COMSC) 

TITLE; Bocomlrig Acquainted With tH© Comput©^^ 

RATIONALE: Lf youVre going to use^ computer^ you must know 

soraething about running jobs on tho computer* ton 

« • 

/ must familiarise ,your6oM with^ soiua bnttona iind lights 

• • ^ - - ' - • \ 

i ^ ^and ndrl^l^#; must overcome ajiy jf<^ar^avthat 

puter is' Qx>^ t.p ,^^t xou.^i^^ it ^^il^^^^ 



must alW'get sWe epaf^dence a'nd not be af rM4 that ^ 

y'ou will harm' the cottiijuter. ' 
- . . ^ '■ ' ' ■ - 

But all these reasons are less Important thhn the 
real rationale for this unit. We want you to Wv^ some 
fun playing with the computer! ' We want you to enjoy " 
pushing the butto^Q, seeing .the lights, and heating 
the noises! Relax p go through this unit, and have a. 
great timel • . * ^ 

.^^JlBCTIVE: At the end of this unit you will be able, to demonstrate • 
^ that you can run a. job through the computer > including 
operatlDg.'Che catd reader and line printer, using -con- 
^ trol cards correctly^ and marking OMR cards/ 

• ■ ■ '\ ■ 

Pl^REQOXSITKS t A willingness ta try, a soft j^ad pencil, and some 

confidence* « 



ACTIVITIES: 

•A. OMK, Cards 

We'll bag-ln x>rith'bHR computar card6, OMR stands for 

» the Optical- Mark Read fealtui'e aV«^.lable on the conrputer 

• ' ' 1 ' . . >■ ••■ ■ 

card reader. The OMR Fortifan card ia shown in Figure 1.1. 
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Figure 1.1 Offe Fortran Card 



The left,-hand side of the card .is enlarged and is shown 
in Figure 1.2, ^ 

The card is dfesigned so that most key words — sucb* 
as WRITE, FORMAT, STOP, and END cap be obtained by a 
sJjogle pencil mark in the box associated with each word 
in the lower left-hand comer of the card. Statement- 
. nutnbejs are marked In the upper left-hand corner of the 



• ^^^^d- ^ Connnents (not actually a parf of the Fortran pro- 
gram Itself) nvay be Inserted anyx^here in the program by 
marking the COMMENT box and then marking the message on 

^ the rest of the curd/ ' / ' • 

The main pprtion of the ca^d is used for .various 

* 

Fojtran statements. Here numerals and special characters 
require only a single mark. t(ie letters all require two 
marks, either in positions? abqve and below f;he letter or 
on both sides of the letter. The cafd is designed, so 
that you may write in the boxes along the top of the card 
the characters marked on the card, thus simplifying mark- 
ing the card and providing the information marked for 
later re^l'erence. 

It should be emphasized that ordinarily q single 
pencil mark in the box with a soft lead pencil (No," 2» 
for example) Ig Suq^cient . It is not necessary , to black 
in the box completely. Sometimes marka that are too heavy 
will be misread by the card reader. Ball point pen nfarka 
are ignored, as are marks from most other writing instru- 
ments. Pencil marks may be erased^ provided that they 
are erased very thoroughly without damaging the c&¥d. Be 
§H5. ^ hruBh the eraser fragments off the card; It^ must 
£i clQan> else it may clog up the card reader. 

Examples** of marked OMR cards 

Examine the card in Figure 1.3. What Is marked in 
the card is written along the top: Colunm 1 contains 

1^ 



1.5 



the character "A'^ coluca^ 2 contains colvimii 3 

tains ''B"; etc. , 
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Figura 1.3 Example of marked OflOR card 

ft 

Examine th^ card In Figure 1*4\ Again, wh«it i« 
marked In the card is written along the top. Notice- that 
the keyword "WRITE" is marked in the lower deft comer. 
Then column 1 contains "("; column 2 conjuains "6"; column 
•3 contains etc. 
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Figure 1.4 Sample OMR crtrd with keyword WRITE marked 

SELF EVALUATION: Look at the card below and write in the boxes' 

at tho top ol' the card \^hat is marked in the card 
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I ;ij c ^0 ^0" 
I " s |] I! i:i 10 

I f ^0 ?0 ffl 10 

12; - gn m 
■ 'ii liJ filj 

* ; ; il 10 10 

J3 !0 iO 10 10 



1 ^ 



i ^ The following statement laarked on the card: 

■ • . / ■ 

• ' • ,4 FORMAT (1 HO, FIO. It r 

\- • - •/ 

V 

• The "A" Is marked in t-h^ block of statement 'numbers in 

; ; the upper- loft-hand corner; it is marked iij th© "Unifts" 

H- • • ■ ) .■ ' 

column, meaning that it is 4, rather than 40^(ten«. ^olumn) 
or 400 (hundreds col amn) or 4000 , (thousands column) . The 
keyword FOl^T is marked in t^he keyword block in th« ^ower 
left-hand corner of the card. The rest of th© statement 



is marked in columns 1-11 of the card: "(" in column 1, 
"I'Mn column 2, "H" In'column 3, etc. 

ASSESSMENT TASK: You are to mark a simple Fortran program on OMR 

cards and run It on tho^^computer . Tli© program 



\ 



and directions are given in the UNIT #1 ACTIVITIES 
• TABLE, APPEIJOIX IX. When you finish this task, 
;^ taka your -program dedk and the printed output pro- 
duced by your program deck to your instructor for 
evaluation. You will pot be allox^red any errors on 
the pringd-output • Don't worry about this seem- 
ingly g^rar requirement; you can meet it. ] <^ 

WHAT NEXT? You may proceed with either UNIT V/2 or UNIT #3, or both. 



1 
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• .UNIT n (COMSC) 
TXTLEj- Flowcharts * . . 

RAtlONALE: A flowchart (also spelled as two wordp, flow chart ) is 

« 

a plan by which a particular problam is to b© solved • 
We stresei the usa of a flowchart to describe a plan 
for organizing a computer based algorithmp or proce-- 
dure for solving a j^roblem^ because for most useful 
algorithms there are many different ways -to accomplish 
the necessary computations. ' A flowchart pins do^ra one 
of these many possibilities. A flox^chart gives us a 
record of what we had planned to do. Before we decide 
to yield to the t,eniptation tq make a change in the solu- 
t'lon procedure, we will be able to make a comparison of 
^ the proposed modification with the original* In some^ 
cases a chan^^ will be desirable, in other cai^ea a 
catastrophe. By spending more time In the planning 
stages^ one usually reduces the debuggli^g time and the 
overall, project time • 



OBJECTIVE: ^mn you f'lnish this unlt» you will be able to construct^ 

y 

a plan or procedure for solving problems of a general 
type J using both a boxed flowchart and a li&e by line 
flowchart. ' ' ''^ 
PRIREQUISItESJ UNIT #1, If required. 



2.? 



ACTIVITIES: We'll begin with fairly detailed discussion of flow- 
' .' charts » and then you can try your hand at constructing 

g aomo ypurself. 

V 

A. Wliat^ Is a flowchart? ^ 
S ^ concept of a flowchart is completely ' 

r. - •^gfenerai. A flowchart is ^mply a step by step 

{ pian y>i" procedure, usually glyen in some graphic 

form,, for accornpliahing a goal or set of goalg* 
A "trt^asure hunt" map Is a flowchart, A game 
board like the one used in Monopoly or Aggrava- 
tlon is a type of flowchart.. ' A set of directions 
_ for asserablying a bodll car or airplane Is a flow- 



chart. Even the jpirocedure that you follow in your 
early morning getting up routine Is a flowchart, 

• * 

though you probably don't have a c6py of it in a 
graphic form. 

Do you get the Idea? Any mulcistep procedure 
can readily generated from a flowchart, whether 
it be traveling from place 'A to place B (the flow- 
chart might b6 a map) , waiting a paper for an .Eng*- 
IJLsh course (the flowcfhart might be called an out- 
line in this fcase) , carrying out a laboratory ex~ 
/ , . p^arlmont (called a procedure) or writing a computer 



I program. , . 

The level of detafi .required in a flowchart 
varies with the. situation and procedure being flow- 

:j! <>/) • 
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charted. In some caso©, it may be necessary to 
present every step in detail { in other cases, 
many steps may be suamiarized In a single line 
or statera<^nt; 

Now that you have a gerferal notion o^ flow-, 
charffe, Igt's go on to some specifics of |JLowchart~ 
lag as used In a simple example. ,i 
Two typaa of flowcharts. - ■ 

Although many notations exist for flowchart- 
Ing, 'orily two will be used'heiret One method con- 
sists of placing the steps in various kinds of 
boxes; the/ timber consists of 'a line by line repre- 
sentation. Ti^e basic reason for using a flowchart^ 
Is to indicate the possible alternatives consider- 
ed by the solution procedure and the conditionsw 
-under which these alternatives are pursued. 

First, consider a rather trivial, but practl- 

■ « 

* cal example — the procedure for putting on your 
shoes and socks (assuming, of course, that you do 
wear shoes and socks). Examine Figure a.l'v'here 
two flowcharts aire given which describe a proce- 
dure for shoeing your feet, 

You can probably read and"*a>nterpret the "flow" 
of th© procedure without any trouble. You'll learn 
about .the meanings of the symbols later. If you 
are sUre that you 'undersi?and how to read the two 
flowcharts and you understand what the "procedure 
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2^ 



Yes 



•Find shoes. 



Right ones? 



No 



Socks on? 



Find socks. 



Right on^? 



Fe^t clean"? 



Wash and dry feet. 



Puto socks on. 



•Put shoes on. 



Begin where arrow comes into box on l±n& by lii^e- flow-' 
chart or at "Start" on boxed flowchart. Find shoes. . 

If they aren*t the right ones, keep' looking "until you 
find the right ones. ' • ; 



When you've found' the ^right ones, check your socks. 
If they're on, then put your shoes on.- 



No 



Yes 



Start 



Find shoes. 



No 



No 



Yes 



2? ■ A 



If your socks aren'^t on, theQ find them. 

If they aren't the right ones, keep looking until you 
find the right dnes. ' 

When you've found the rlght''one8, check your feet. If 
they're clean, put your socks on, then your shoes ^ 

If they 'ire not c3.ean, wash and dry ^bur feet. 

Put your socks on. ' ' ^ 

Put^your shoos on. ' > 

Stop whan ^rtow ^oes out of the box on the line by line 
flowchart or with "Stop" ot^the boxed flowchart. 

Figure 2, 1 -^A line by line /lowchart (left) and a boxed flowchart (right) describing 
a procedure (center) for putting on shoes aufid spQ^^ 




Yes 



Put socks on 




4S 
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l8 for sho^-liL your feet as deQcribed by the flow- 



^^^"^^^ proceed with Activlty-C. 
A numeric example, 

L<jt ^ take an example more nearly related to 
computer progranmilng — finding t^e sum and average 



V 



of N values , Y ^ , Y ^ , Y 3 ,j . . . , Y 

The sum Is defined by 




Yj + Y, + Y3 + ... + 



and the average- is defined by 
- 'AVfe =- SUM : N. 

k 

A procedure for performing these calculationa i^ 

described by the flowcharts in Figure 2.2 along 

with an explanation of the operations represent-* 

ed by the flowcharts. After you have examined 

the flowcharts, then we'll discuss e'ach one In 

* 

greater detail. 
D. - Discussion of the line by line flowchart. 

In the VliDe by liqe" flowchart / the flow of 
eQmputat\on is from one line to the next, unless 
a branch occurs, which is indicated by an arrow 
emanating from, the line. An unconditional branch 
^ is indicated by an atrow without conditional Indi- 

^ V 

cators. A conditional branch 1$ indicated by an 

! 

arrow or arrows with conditional indicators, such 

34 
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*j Read N,Yj, • . • , * 



SUM 0 ■ 

K 0 
K : N 

K ^ K+1 ' 
SUM SUM + Yk 



AVE SUM T 1^ 



> • * 



Write SUM, AVE 



!5 



J- 

Olftaln the numbers that will be used\ln^h6 
computations, ^ ^ 



« « 

Set the summer to zero, ( means "is replaced 'by*') 
This Is analogous to clearing the dials on a deslt 
calculator, resetting them to zeros. 

A counter K is set so th^t the values of Y can be 
added one ad ^ time, ' ^ 

K is compared to N» If K^N, then all the values of 
Y have been added, and the calculation of the ave^^ge 
is next. 

When K}!fN,'then the counter is incremented, 

y • • ■ . 

and the next value of Y is added, after which the 
counter is checked again. As long as KjffN, repetition 
of the adding operation is continued ; this is called ' 
looping. , • " , 

When the ansver to the question KSN? is y^&^ then . 
the average is calculated. 



The results of the calculations^arfe recorded for later 
use, and that's all there is to do 1 J 



Staxt*'^ 



Read N, 
Yj., .'. . , Yj^ 



SUM 0 



■ \ , 

\ 



K 0 




K ^ N? 


Yes " 






K^l 






SU>I<-SUMWj^ 







Figure 2.2 Line by line, (left) and boxed (right) flowcharts describing 
a procedure (center) for calculating the average off a. set of N numbers. 
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as <, >, emanating from a statement 

of the fotui 



expreaalonl : <^xpre8sion2 



At line 4 the statement which follows the state- 



ment 



V 



•a 



ft 



aa long as K < N la on line 5, When K ^ N, the 
statement at line 7 follows the am at line 4. 
Entry to the routine is Indicated by the unattach- 
ed arrow at line 1; exit from the routine is indi- 
carted by the arrow at line 8. 
E. 'Discussion of boxed flowchart. 

In the boxed type -flowchart , each statement 
or idea is placed in one of six types of boxes. 
The shape of the box identifies* a specific func- 
tion that is to be performed. Box types and their 
functions follow. ' 



l^OX TYPE 





FUNCTION 

initiate or terminate a program 
segment or algorithm 



execute a process or perform a 
calculation 



0*y 



BOX TYPE 



initialize 



test 



increment 



FUNCTION 



perform loop process 



1 



perform input or output 




make a decision 




connect to another sequence 



The sequence of steps, or flow, in the flow- 
chart is indicated by arrows which connect boxes. 
Unlabeled arrows are called unconditional branches 
Arrows with labels designate conditional branches , 
allowing the flo^/ to proceed along alternate path- 
ways, the^conditions being stated by the labels 
on the arrows. 

Now, let's take each block of the boxed flow- 
chart separately. 




Obviously, this tells you where to start in uhe 
flowchart. 



<!8 



1^ 



' It's also obvious that this box tells you 
where to stop or tegrminat© the' procedure. 
This box must be at the logical end of the 
flow through the flowchart. 

This box Indicates that we want the computjer 
to get the valuo of X and all the- lis from 
soma device which can" supply fhe computer with 
information or data. Our concern at this time 
la not how this Is accomplished by what kind 
of device; rather the general notion of putting 
information Into the system from aom© external 

♦ * 

source is the main concern. (This is analogous 
to a person's putting data into a calculator 
through the keyboard, th^'^ person himself being 
the external source.) 

Similarly, this' block instructs the "computer 
to write the results on some external output 
device. As in the case of the read box, the 

* 

main concern now Is not how this is done; just 
the general notion that It is done is important* 
(This is analogous to th© printing of results 
on pap^r tape by a desk o^lcqlator or cash reg- 
ister, ) 

All of thes^ boxc^B represent some process, 
, including calculation^ in two cases. The 

5.9 



SUM^SUM+Yk_ 



-J- 



AVE-fSUM:N 



T 



first box says, "Ropl«ce i^hat la in SUM by 
zero." llie second box says, "Replace SUM 
with the current value of SUM added to Y 
The^ third box says, "Replace AVE with SUM 
divided by N. " ^ 



K 0 
K N? 



K ^ K+Z 



Yes 

~1 



This box sets up and controls a loop process, 
TlVo sunfflilhg bo3t is to be repeated N tline"sr 
The counter for the loop is given an initial 
value of zero. The next statement in sequence 
is K :i N? As long as the answer is "no," 
Che next statement in sequence, K +^ K+1, is 
executed, followed by the summing process. 
Then the value of K i^ compared to N again, 
and the 4>roces8 is repeated as long as K is 
not ? N. But, when K is ^ N, then the loop- 
ing will be terminated and the next box in 
sequence will be executed in this case, 
AVE SUM V N. 

h 

Notice that the loop process box ha^; 

» 

more than one arrow coming out of it; one, 
the one labeled "yes," is a conditional 
. branch. Notice also that the box contains 
three distinct steps: Initializing^ K, test- 
Ina K against N, and Incrementing K, 

The loop process could also be represented 
by the syaibols shown on the next page with 
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SUM^SUM+Yk 

1Z 



i 



K ^ 0 



No 



K ^ K+1 



< KSN? > 



Yes 



F. 



the three stops — ii^ltializlng, testing, 
and incrementing — mhoxm separately. Her© 
the decision box is used. Like the loop 
process box, the dacislon box has more than 
one exit from the box. Two conditional 
branches occur In this case, one labeled 
"yes" and one labeled "no." Sequences which 
set an initial value and teat and Increment 
the value occur so frequently, however, that 
they are usually combined into one loop proc- 
ess block. Generally yf\i should expect to 
use the loop proce-se Tyix for InitiallEe-test- 
increment sequences. 

Some additional examples of boxed flowcharts. 




Figure 2.3 
Decision Box 



^ The box shown 'in ^^gure 2.3 may be used 
to Indicate branching alternatives such as 
(1) less than zero (<0) , equal to sjero 
(«0) , greater than laero (>0) (three 
way branch) 
<ii) less than or equal to zero <sO), 
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3X 



t 



greater than zero (>0) (two way 
branch) 

> 

(ill) etc. 




Figure 2t4 
Decision Box Examples 



In Figure 2.4 examples of two way 
branches and three way branches are given. 
If 

AREA " 40.23 < 0 



the n©Kt box in sequence is one indicated 

by (7) Note that 
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ARESf- 40.23 < 0 

y * \ 

and A 

Al^f < 40.23 ' 

are two different ways to atat© that th© 
quant ity called AREA is less, thjan ■.40,13 ,* 
The other conditions require additional 
testa before the noxt box In ^©quenco is 
determined. These choices are Illustrated 
in Tabla '2 A. 



FIRST CONDl1:iON * 


'— ^-^f ' ^ ■ ■■ ■■^^ ^rr^..- J 

SECOND CONDITION 


NEXT BOX * 


AREA ~ 40.23 < 0 


^,»«..-.^«-,^^ww^ 1 .— ■ 1 n I I--.. iL.ii.i 11, ri r ■ ■■■■ni ■ ■ ■■■ 


' 7 


AREA - 40.23 > 0 


C - 27rR « 0 


3 


AREA - 40'. 23 > 0 


C - 2TrR 9* 0 


. 4 


AREA - 40,23 ^ 0 


L < 0 


•5 


AREA - 40.^3 « 0 


L ^0 


6 









Table 2.1 

Branching Alternatives for Figyre 2.4 
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<0 







<0 





Flgu;:e 2.5 



AlternaCe Rep res^tat Ions of Two Way Branches 



Figure 2.5 Illustrates different ways to 
represent the same alternatives. 

For two way branches, it is possible to 
Stat© the question in terms of logical rela- 

« 

tlons rather than arithmetic relations. Figure 
2.6 illustrates this slightly different nota- 
tion. 





Figure 2,6 

Logical Representation of Two Way Branches 



3i 



V 



2.15 



<0 




>0 



\ 




Figure 2,1 
A Brandjing Maze 



Fill in Table 2.2 to correspond to the branching 
alternatives for Figure 2,7. ' 
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On 



FIRST 
CONDITION 




SECOND 
CONDITION 



THIRD 
CONDITION 



NEXT 
BOX 



'X: 



Table 2.2 

Branching Alternatives for Figure 2.7 



G. Your textbook tnay>have additional information 
that is helpful. bo\A^tlvity 1 in the UNIT #2 
ACTIVITIES TABL^. 

SELF ASSjESSMENT: ' . , 

A. Construct a line by line flowchart for Figure 2.4. 

B. Construct a line,b5? line flowchart for Figure 2.7. 

C. Construct a boxed flowchart containing of at least three 
decisions describing how you spend Mondays during the 
current semester. ^ ' ' 
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D. Construct a iin© by Xin^ flowchart Gontalnlag at least 
three decisions describing your enrollment in the Univer- 
aity thim 9©^©s^:er. 

E. Construct a boxed flowchart containing at least two 
decisions describing how to change a flat tlr© — or 
Ijow to get h©lp, if you donU know how to change it. 

^' ' ^^'^^ ^ t _^ lip® J'y liw® flowchart consist lag of_ a8_ few. 
operations as possible to determine which of eight objects, 
was of different weight if seven of the eight had Identi-" 
cal weights and the eighth was of dlffereht weight , using 
only a beam balance. Your solution must also detertalna 
whether the object was heavier ^r lighter than the other 
seven* 

G.. If you are enrolled in the "PIPI Package," then construct 
a line by line flowchart to describe the techniques of 
preparing a report as described in Cotnmunl cat ions Unit 5. 

See your instructor and show him some of your floxvcharts. He 
will help you with any errors that have come up or with anything 
"that you don't understand. 

ASSESSMENT TASKS: See your instructor. You will need pencil and 

paper, and you may use your books. You will be 
^quired to write. both boxed and line by line 
flowcharts . 

WHAT NEXT? You may proceed with UNIT #5 if you have done UNITS //3 
and #4 already. If you haven't done 3 and 4, then go 



2.18 



to UNIT 
UNIT /M. 



If you have done 3, but not 4, then do 
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mxi #3 (COMSC) 



TITLE: Variables, CQnstanta, Expressions and Assignment 
Statements 



'RATIONALE: Fortran is a procedure-oriented language developed 
specifically to handle algebraic expressions. Th© 
m&at basic elements of algebra and Fortran are varl- 
ables and constants and the oxprassiona constructed 
from them by connecting them with arithmetic operators. 
In ord^r to program In Fortran you must have a thorr 
ough graap of the#e concepts In both ^Igebra and For- 
tran. Your grasp of the algebra part is assumed; the ' 
• Fortrdn part is contained in this unit. 

OBJECTIVE: When you complete thid unit, you will be ab^e to 

(i) identify and construct integer and t^al 
constants and variables; 
(i^i) Identify, ^construct, and evaluate Fortran 
. . expr©«8jk>ns; •« 

^ (ill) Identify and construct assignment statements, 

"and describe the results when they are exe- 
' . cuted. 

PREREQUISITES J UNIT if required, and a working knowledge of 

jelementary algebra. 
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ACTIVITIES: 



Part I. Fortran variabXea atvd con^taatQ^ . ■ 

1. Tl^e onei most noticeable difjfareuce fe^itw^a©^ aXg€ibr^ and 

arithmetic is the use in algorbr^ of alphab^tl^' letter^ 

to represent Unknot'Oi values* As in tho cme of aj^gebrji, 

this is a particularly imporfeant ch^rA€ta3s;*l6tic oi^J^^X'^ 

tran. Just as in algebra we solve or.r^^duc© ei^ijesqiona 

in which unknoiNms (variables) appear , we will manipu- 

iate expressions in Fop^jran^ oven though at 6ha time of • 

v^xrlting the program the values of- the variablea are ifti- 

knovm . o 

' 2. Refer to UNlt //3, ACTtVITIES TABLE, Activity 1. 

3. In Fortran^ the mode or^type ^ the number being used 

is designated through the Initial letter In the varl« 

able name* You must be very careful to impure that 

the name you u^e for a variable correctly reflects the 

uae that will be made of the variable. One of the moat 

common errors made by new and old' programmers alike 1© 

to us© an integer name for a value that Is .not a x^^hole 

number, or to uae ^ teal natfta for a value that is a 

whole number. If we attempt to place the value 3.4 ' 

in the location labeled IX, IX. would contain only the 

value 3. The .4 would b^ dropped and lost. 

SELF EVALUATION FOR PART I: / ^ • 

' ) ' 

The answers to th^^ exercises are given on the page 

following them. 

1. Identify the follox^lng'as variafble names* or constants 
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and aa real or Integer if they are valid. If they are 

•I 

invalid, state why they are invalid. 



a. 


AKTION , 


b. 


X-RAY 


c. 


INTEREST 


d: 


5.34 


e. 


SUM3 


f . _ 


IQ^OOO" ' 


8- 


KING 


h. 


2AIJ 


1. 


5.78E6 


j. 


25 


k. 


DISTANCE 


1. 


lAj 



m. 10 p 365. 

n. RATE 

o. C 

p. K8J3 

q. STOP' 



Take the number ^56 and write if as an integer constant, 
a real constant., and a real constant in exponential form. 

Take the number 25.6 and write it "as an integer constant, 
a real constant, and a real constant in exponential form. 

:Wrlte five 'different integer variable names. 



Wrltje five different real variable names. 

4? . . 



Answers: 

!• a. Valid real variable 

b. Invalid: special character - 

c. Invalid; more than six characters 

d. Valid real coxistant 

e. Valid real variable 

f. Invalid: imbedded comma 
g\ Valid ihtegar variable ^^^^ 

h. Invalid: does not begin with alphabetic character 

1. Valid real (exponential) constant 

j. Valid integer constant 

k. Invalid: to 'more than six characters 

1. Invalid: special character * ' i 

m. Invalid: imbedded „comma 

n* Valid real variable 

o. Valid real variable 
p. , Valid integer variable 

q. Valid real variable .< 

2. Integer, 256; real, 256, or 256,0; real exponential, 
256 .EO or 256 •OEO tyr 2.56E2 and other variations. 

* 

3. Integer, 25 (the .6 ia truncated); real, 25.6; realf 
exponential, 25.6E0 or 2.56E1 or 256. E-1 and other varia- 

* 

tions. ' 

4* Any^ combinations of up to and including siK alphabetic 
and numeric characters, beginning with one of the lettergi 
I'-N, is acceptable • 
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5. Any combination of up to and Including six alphabetic 

and numeric characters, beginning with one of tjie letters 
A-H and 0-Z, is acceptable. 

Note: IBM 1130 Fortran allowB a nj^xlmum of only five characters 
in varia'ble names* 




You must be sure that you can recognize the difference between 
integer and re'al constants and variables names; proceed x,rith 
Part 11 when you feel that you are ready. (^A 

Part H. Fortran Expressions. 

1. Refer to UWIT #3 ACTIVITIES TABLE, Activity 2. 

2. Tliere are several very important points in this 
section which need emphasizing. Reread the reference 
cited in the ACTIVITIES TABLE with special emphasis on 

a. the use of parenlflleses in expressions; 

■ . b.' the hierarchy of operations in an expression; 

c. valid typjs of exponentiation; 

d. the mode or type of the value of an expression; 

e. problems of accuracy and precision; ' 

f. and integer division. 

3t~ Th© exponentiation operator requires more discussion. 
Either a real or an integer quantity may be raised to 
an^ln^ger power. For example, it is correct to use 

or " ^ 
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Wlien an Integer exponent is used, the exponentiation 
is actually performed by successive niultiplications. 
I'or OKumple, iq evaluated by the computer as 

A-^A^A^A. Tliu«, A may be positive » negative, or jcero. 
Furiherraore, K may be nega'tiVe or zero (if A?<0.0). 
If K has a value of -4, for examiple, then A**K is 
evaluated as 



A A A A 



or 



l,Oy 



A*AA^AA 

In summary , there are no restrictions on A or^^C^^r 

that is, for a quantity raised 

to an integer power (except that A cannot be giero 
'^en KSO). 

for the case J**K, there is one restriction, 
however. Since by definition no fractional parts are 
available with integers, K cannot be^ negaiy^ In 
other words, JA*K cannot be evaluated since l/'j con- 
tains no fractiotial part* (Also J cannot be ssero 
x^rhe^ K Is z^ro. ) * 

ft 

Real exponents may be used. For example, 

is a valid- expression. When real exponents are used, 
the expression is evaluated with logarithms;/ 




.antilogC® 'logA) 
or In Fortran* * 

EXP(E*ALOG(A)) 
Since the logarithm function is undefined for A^O.O, A 
must: always be ^eater than Eero. 
Tlxe expression 

is a i lowed with sox&e compilers. When it la allowed, J is 
converted to a real quantity before the expression is 
evaluated; the result ts real , not integer. 

llie results and restrictions of the types of expo-- 
nentlation are summarized in Table 3.1. Certain sugges- 
tions become apparent upon examination of the concepts 
in the table. 

(1") Usually, if the power to which you ^re raising 
a number la a small Integer, it may be better 
simply to multiply it out rather than to use 
the exponentiation operator. *For example, 
Xft*2 la better written X*X. 
(ii) Since the use of an integer power is less 
restrictive » use an Integer power whenever 
possible > unless the power is large, In x^rhlch 
case the execution time can become excessive, 
(lit) When the power is large, it is better to use 
a real exponent for ehprter Bxacution time, 
provided, of course, that the number being 

r 

raised to the power is greater than is^ro. 
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Type of 
exponentiation 


Restrictions 


Evaluation 
procedure 


. ........ ^ 

Result 




— "r-f~- 


— =- i^- 

• 

J'^J*. . .*J 


Integer 


— ; — 


Generally none- 
most general 
case* . 




Real 




Not allov?0d 
wlth^ some com- 
pilers; if 

allox^7©d^ J>0 
• 


XJ ^- J 

EXP(EAAL0G(3CJ)) 
or 

aQtllo8(a-logXJ) 


Real 




A^O.O 

• 


EXP(E*ALOG(A)) 
or 

antllogCelogA) 


Real 







* There ar^ additional restrictions whan J or A Is aero. The 
following cases are undefined: 



Table 3.1. Results and restrictions on various tvneQ of 
exponantlation. J and K represent integer quanSlLf 
A, E, and XJ represent real quantities. 
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4. The hierarchy of operations can be aummarlKed as follows: 

(1) PArenthosea, Innerpwst first, from left to right. 
(11) Function© from left to right ♦ 
(111) Exponentiation from left to right, 
(iv) Multiplication and division from left to right, 
(v) Addition and subtraction from left to right, 

SEU^ EVALUATION FOR PART 111 

Answers are on the page following the exerclaea. 

1. Identify the following expressions as real or inte- 
ger if they are valid. If they are invalid, state 
why they are invalid. 

b. AAM+2.0*B-C 

c. 2.0(A+B)=*C 

d. J**I/K*>*N i " 

e. A/-B-K: 

« 

2. Construct Fortran expressions for the following. 




Answers • 

1. a. Invalid (generally) - mlx®d mod© 

b. Valid, real 

c. Invalid - mts^ijig operator after 2,0 

d. Valld> integer 

e. Invalid - two operators (/ and -) togethcir 



2* a.^ <A^)/(C+D) - - - - - 

b. (A*B)/(C+10*0) or A*B/((>HO.O) 

c. (A+B)/(C+D/E) 

d. A/B+s(CAD)<(E*F*G) or A/B+C*D/(E*F*G) 

e. (f'»^(R/S))A*(T-1.0) or (P*R/S)*a(T"1.0) 

If ?*K/S is negative, an error will result sine© the 
exponent is reai and the expression Is Evaluated by 
logarithms. This problem is ov^rGome by writing the 
expression with an integer exponent. 
(PAR/S)**(IT"1) 

Part III. Assignment Statements. 

1. Refer to UNIT #3 ACTIVITIES TABLE, Activity 3. 

2. In Fortran assignment statements, the "equals" symbol 
does not actually mean equality. Rather It should be 
thought of ae a storage operator or replacetnent op- 
Br^tor. Tlie value of .the expression 'on the right of 

is stored in the storage location identified on 
the left of "«"; or sayljjg it another way, the value 
on the left of "«" is replaced by the value of the ex- 
pression on the i^ght, ^ 



3. Notice that the value of an Integer ©xprosaion on 
the right can be stored as a real value on the l®fjt, 
and vice versa* For eKaraple> J««2.6 gives an integer 
value of 2 stored in J, (The fractional part is 
truncated.) A-2 gives a real value of 2.0 stored 

t 

SELF EVALUATIOM FOR PART Ul.. ^ 
Answers are on the page following the exercises. 
!• Identify the following assignment statements as 
valid or invalid. 

a. J*K*»I 

b. A-2.0AB 

c. ~B»C/D+E 

d. X«>S1N(Y) 

2. Construct Fortran assignment statements for the 
following. 

a. K » coa(y) + x-elnCz) 

b. a - / ^riffiiZ^ ' 
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c. r « (2.0-^x^)^/2 



3. State the numeric value of J that will be transferred 
to memory by the following arithmetic asslgnjuent state- 
men ts« 

a* J « 5*5/7 • 
b. ^ « 5/7*5 



EMC 
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c. J « 2.0/3.0 + 2.0/3.0 

d. J « 5*7/5 
&. J ^ 7/5*5 

Stdte the numeric value of X that will be transferred 
to, memory by the following arithmetic assigtMuent state- 
ments. 

• ^ _ . _. ,0*4 . 0/1, 0 

b. X - 7/5*5 e. X « 4.0/2.0*5,0 

d. X - 4*3**2 . f. X « 5.0/3,0+3.0/3.0+5.0/3.0 

Refer to UNIT #3 ACTIVITIES TABLE, Activity 4. 



\ 



So 
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Answers. , 

1. a. Invalid single name rauet appear on left 

b. Valid ' . • 

c. Invalid - --B Incorrect 
d- Valid 

2. a. X » COS(Y) + X*sm(Z) 

or A - (-(-X+Y+27.9)/ZA*2)*AA 
c. R - (2.0+X'^*2)**0.5'or R « SQRT(2.0+X*A2) 



f 3. a. 3 

b. 0 

c. 1 

d. 7 

e. b 

A. a. 3, 



0 

b. 5.0 

c. 36.0 

d. 10.0 



■ ^ 



e. 10.0 

f. Approximately 4.33333 or 13/3 

5. Refer to UNIT #3 ACTIVITIES TABLE, Activity 4. 




51 



ASSESSMENT TASK: Please see your Instructor. You will bp required 

to Identify and construct correctly written constants 
variable names, exprosslons » and assignment state- 
ments. You x^ll also be required to evaluate Fortran 
expressions ^ind to describe the results when Fortran 
asaignmant statoment ara executed. 

n 

^*''', ^^^''^^ ^^"^ "^^y. ^0 ahead witn VUU Jl2_ or with JJMIl M, __ 



V 
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UNIT j?A (COMSC) 

TITLE: STATEMENT NUMBERS AND UNCONDITIONAL .BRANCHES ^ 

RATIONALE: One of the important icharacterlstlca of the modern 

computer is its ability to execute repeatedly a series 
of instructions automatically » This unit is the first 
of several that will help you learn to utilisie this 
ability, ' ' \ ■ 

OBJECTIVES: When you complete this unlt> you will be able to 

construct and identify statement numbers and uncon- 
' dltional branches that will utilise the statement 
numbers. - ^ . • 

* ■ * 

PREREQUISITES: UNIT- #3 <COMSC) . . ■ ' 

ACTIVITIES: / • ^ • 

1. Normally program steps are executed sequentially In the 

same order in which th^y appear,, -In Figure 4.1 the first 

statement executed would put 5.0 in the storage location 

\ 

named A. 



A « 5-.0 

B A '^ 1.0 

C « B + A * 3.0 



\ Figure 4,1. A aaaiple program' segment, 
iXlustratin^the norwdl order of execution from top to boj:tom. 

ERIC . . • ^'^ S3 • 
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WW*r^^ J! J 



) 



A 

The next one oxecutod would put a 6.0 i.n location B. The 
last one would put '21.0 In location C. Normally this .order 
of execution from top to Ijottom is desirable, since usually 
we do want th^i^ Statements executed in the sara© order In 
which they are written. There are^ however, Important ex- 
cept ions. iFrequentXy we may want, to repeat the axecutloA 
of some statements or gjroup of statementQ* Without tlie 
abiliyr to repeat the execution of a aeries of program 
steps, the programs we write would be too long to be 
pract leal, 

F*or example^ suppose we want to compute the volume ai 
25 boxes. The first box^ has dimensions of 1 unit, 4 unite, 
and 5 units Each succeeding box has dimensions each 1 
unit larger than the preceding box. For such a job we 
might write the program sho^wm in Figure A, 2, 
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A 


• l.D 










B «• 


4.0 










C » 


5.0' 










VOL 


" A 




B 




c 


A « 


2,0 










B « 


5.0 










■C « 


6.0 










VOL 


»» A 




B 


•k 


c 


A « 


3»0 










B « 


6.0 










C « 


7.0 










VOL 


« A 




B 




c 



etc. 



V, 



■ Figure 4.2. Sample program sagmant for calculating 
th© volume of. 25 box^ajwlth dimensions Incremented by on© ©sch tim;©. 
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This series would continue un^ll w@ had computed the* 
volume of 25 boxe^. How many statements would we hav© 

written? ^ Notice' that there are 4 statements for 

the computation of VOL fc^r each box. 

If we take advantage of the^teratlve capability of a' 
computer » we can write the program in a much shorter way, 
9hown in Figure 4.3. The next to the last line is not a 
valid Fort ran "statement; it is a sulsstltution for a Fortran 
statement that wil/ be covered later. 

















A « 1.0 










B— 4.0 










C - 5.0 






5 




VOL » A 


* B ^ 


c 






A = A + 


1.0 








B « B + 


1.0 


* 






C « C + 


1^0 








if A is 


equal 


26 stop 






GO TO 5 


T~- 


a 



Figure 4.3. Shortened program segment for calculating the 
volume of 25 boxes with 'dimensions incremented by one each time 

There are some things in this series that need explain- 
ing, but one thing should be clear.' From a series of 100 

e 

^Statements, we have cut dox-m to only 9 statements. 

Take a look at the -fourth statement in Figure 4,3. 

^ There is a number that appears in front of the statement. 
This 'number is referred to as a statement number. The 
sol© purpose of a statement number is to Identify the 
stateMOt for later reference. We give it a unique number 
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;8 



8o th^t we can refer to that statement from other part 
of the program, (Note tha't thia Is not a sequence number^ 
Statement number 5 la not necesaarlly th© fifth statement. 
If you have a hangup for numbers, you might name three 
children '^ren." "Ti.o." and "Twenty." TTiese are valid 
names axi^ do not necessarily imply that- you have twenty 
children, nor are they neceaaarlly named in .numerical 
order.) ~ ^ 

The statement numbers in Figure 4,4 are perfectly 
valid. 



77 
105 
6 

999 



A B 

A = B + 15.0 + 
B ^ B * A 
B B + B 



Figure 4.4.- ExaKpples of statements with statement numbers. 
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Stat^ement numbers must be'positlve integers from 1 
to 99999, though the maximum number ailowed may be less 
for some computer systems. 
2. Refer to UNIT //4 ACTIVITIES TABLE. Activity 1. An example 
of a Fortran coding 'form, which is available in the book- 
store, is shown on page 4.5, You are encouraged to use 
^ coding forma for writing programs to be punched on com- 
puter cards, xvhich yop»ll take up in UNIT #5, since the 
format of the coding form is the same as the format of the 
I'ortran computer car'd. 

Notice 'oDfce more that statement numbers are placed 
anywhere in columns 1-5 and Fortran statements are placed 




ORTRAN C6om FORM 




FORTRAN STATEMENT 
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80 


59 


40 


41 






44 


4& 


4C 


4T 


40 


45> 






as 


&3 


S4 








00 


^9 


eo 






6JI 


e4 












TO 


71 


T3i 


r5 


T4 
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Til 
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ONLY 
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3. 



anywhere in columns 6-72. 

I'he last etatamont in Figure 4.3 'is called an uacdndltional 
branch. Up to this point, each statement laaa been executed 
sequentially. Thia last statement, however, chang©$ the 
order of execution. It tolls the computer to execute next 
the statement identified by statement number "5" and continue 
SHSH^JlLi^LLll ll^. <^tiat point. The next statement executed 
after statement number 5 is the statement ' 



• 1 



A « A + 1.0 



4. 



In an unconditional GO TO statement, the to TO is always 
followed by an integer constant which is' the unique state- 
ment number of the statement" to which transfer Is to take 
place. 

Refer to UNIT h ACTIVITIES TABLE, Activity 2. 



SELF EVALUATION: 



1. m\ic.h of the following are legal statenient numbers? 



a. 13 

b. 9B 

c. 3456 



d. 123456 

e. 2/3 

f. 2-1 



2. Write a statement ' that will cause a branch from the last 
statement of the following routine to the second statement. 
Add statement numbers -jif necessary. 
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3 A « i»0 

^ B " A + 3.0 

A « A + A 

H » 0,5 A A A* 2 
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Write a sot of Fortran e^tatemente (a pro araro aegnient) that 
will count by fives. Set thtj counter to aoro; use integers 
Then add five to tfe counter, and go back to the statemeint 
that £idds flv«, etc. (Refer to UNIT //4 ACTIVITIES TABLE, 
Activity 3, for help,) 



Alls we r 9 



Legal statement numbers are a and c. Tlie number in d haa 
more than 5 digits. "The o«e8 contained in b, e, and f 
contain characters that are not numerals. 



3 
50 



A - 1.0 , 

B « A + 3.0 

A " A + A 

H « 0.5 A .A *A 2 

GO TO 50 



3. 







. tf^ „ ..... . 










N - 0' 






10 




N ^ N + 5 










^ GO TO 10 










t ' 







ASSESSMENT TASK: Please see your instructor. You will required 

to Identify valid statement numbers and to con- 
strict on© or more ?hort program segments using 
unconditional GO TO statements and' the taaterial 

in mwh. V , ■ 

'6n 



4.8 

WHAT NEXT? If you havo completed UNIT tf2, you are ready to 

proceed UNIT if5. If you have not done UNIT if2, 

then do It, after which you may go to UNIT ^5. 



1 
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, UNIT //5 (COMSC) 

TITLE: Preparing a Job for Running on the Computer 

RATIONALE: In the next unit, UNIT //6 , you will b© writing your 
first Fortran program* Before you con run your pro- 
gram on the computer, you must know about keypunch 
machines and punched cards; you must know how to run 
Jobs 'on the computer; and you need to know how to 
document a program. 

The first part of this unit deals with punched 
carda. Since the punched card Is atill one of the 
prime means of input to~the computer, you need to 
know how to punch and Interpret computer cards. In 
order to punch cards » you make us© of a card punch 
or keypunch machine, which you will fjind out how to 
use. 

second part of the unit describes documenta- 
tion of programs and why it is Wportant. * 

The third part tells you how to run a job on the 
computer* If you were required to do UNIT //I, then 
most of this procedure will be a review. 

OBJBCTIVEi When you have completed this unit, you will be able 
to demonstrate that you can punch computer cards and 
interpret them, documeiit and punch a Fortran program 

5.1 
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4<f that la given to you, and run the program on th© 
computer. 

PREREQUISITES : UNITS in and /M. 
ACTIVITIES: 

PART 1» Punching and interpreting coanputer cards. 

A. "Do not fold, mutilate, or spindle," "Th© punched 
•hole will add ItaelF to something else, subtract it- 
self from something else, multiply Itself by some- 
thing else, divide itaelf by something elae, list 
itself, reproduce itself, classify Itself, select 
itself, print itself on a card, produce an automatic 
balance forward, file Itself, post itself, cause a 
total to be printed^ compare itself to something else, 
reproduce and print itself on the end of a card, cause 
a form to feed to a predeteJ-mined position,' or to be 
rejected automatically, or tbv^pace th^ form ^rom one 
position to another."^ 

How can something that is nothi^ng do all of this? 
Simply by punching rectangular shaped holes into an 
IBM card (punched card ^ as codes for letters and num- 
bers, we can use the card as input to data processing 
\ equipment .which In turn performs these functions, 

s^,-- A standard IBM punched card measures 7 3/8 by 

3 IM inches, is 0.007 inches thick, and is made of 

y 



Donald A. C. McGill, McGraw-Hill BQok 
Company, page 30. 
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special paper which withstands the effacts of handling 
by man and machine. A larger card punched with round 
holes is used on Sperry Rand Corporation (UNIVAC) equip- 
ment j however we will consider only the IBM card,^lnce 
it is the most common, being used on nxjat mod ©pf equip- 
ment . avan by .DMIVAC since 1966, - - 

An example of an IBM computer card is shown in 
Figure 5.1. Usually the upper corner is cut at a 60° 
angle with the long edge of the card, although cards 
will be found with uncut corners. The corner cut has ♦ 
no effect on the operation of the computer and la only 
to enable the operate^ to mak^ a quick visual check 
that all the cards ar© facing the same way and are 
right-side up. Mixed corner cuts and mixed colors 
can be used if it is important to be^able to distinguish 
different card types visually. 

The card Is divided 'into 80 columns numbered 1' 
thru 80^ irom left to right, and into 12 rows numbered 
12, 11, 0, 1, 2, 3, 4, 5, 6*, 7, 8, 9, from the top of 
the card to the bottom. 

The Hollerith cod© used for punched cards. 

The code used in punching data into these cards 
w^8 patented by Herman Hollerith-, a statistician for 
the Bureau of Th© Census, This code enabled the 
Census of 1890 to be processed by " automated equipment. 



Row 12— *• 
Row* 11 
Row 0 



Column 1 




Colunm SO 



12-edge 




""^ ' I " r ' T i ' Mi i l i ii i ~i '..mo — I...: 



I 15 '6 II A li y. •/ . -i ij .ij .• 



■■. .'5 .'6 ■• .-s !■> JO I. );• u ,u n H )( n « ». .nj .« „ ,e „ ,„ 5. „ jj „ . „ ,^ ^.^ ,j .. 



1 l» -5 t 



! >» I) 



Row 9 



^ tii'i^i'nLi-miDJioL".i';i;?r»i^ 

|OOOaOOOOflOOOOOOOOOOOOOO, . OiimilEJOTOIimm^^ > OOflOOOOflOOOOOOOOOOOOOOO 

i 1 1 1 n 11 i r 11 n n 1 1 1 1 1 n 1 1 M 1 1 1 n 11 1 n 1 1 11 n n M n 11 

§ 2? ?2.?2???2? 2 2 2 22 2 222 ?2?2?22??2?2 22 2 2 2 2 2 2 2 2 2 2 2 222 2 22 222222 2 2 2 2222 2222 222 2 22? 2222 2 
U 3]3] 3 3 3 3 3 3^3 31 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 
^ 4 4 4 4 4 4 4 4 4 4444 4 4 4 4 4 44 4 4 4 4 4.1 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 444 4 4 4 4 4 4 4 4 4 4 4 4 4 444444 4 4 4 4 4 4 4 4 4 4 4 4 
I 55 555555555555555 555 5 555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 55555 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 555556 5 5 5 555 
g6G6G66S6686 6S6666B66 6666 6G66666666SG666666666S66C6666GG6666G66GG66G6656GU6666G6 
; n n 7 7 J /? 7 7 7 7 7 7 7 7 7 7 ; 7 ; M n 7 7 n 7 7 ? 7n 7 7 7 7 7 7 7 7 7 7 7 7 n 7 7 7 7 nn 7 7 7 n 7 7 7 7 7/rTTSm 7? 7 7 

M 8 8 8 U 8 8 8 a 8 8 8 8 8 8 8 H 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 M 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 U 8 8 8 8 8 B88li)l.88 
9 9 3 9 g 9 3 9 9 9 9J 9 9 9 9 9 3 9 9 9 9 9 9 9 8 9 9 9 3 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 95 9 8 9 9 9 9 9 9 9 a 9 a 9 9 9 9 9 q q Q M ft q olrm^ 0 0 



fffa.n«ii.Tmrii i M 



Wi>ii'i>wnfjiL..iiai n 



mm- -rill mon n ii>Mn ll.h .. 



9--edge 



Figure 5.1. An example of an IBM computer card. The 80 columns are numbered by small numbers at 
the top and at the bottom. The card also contains 12 rows, 10 of which are numbered 0-9 and 
two of which are not numbered on the card. Row 12 is at the top of the card, and row 11 Is 
between row 12 and row 0. The top edge of the card is called the 12-edge, while the bottom 
edge is called the 9-edge. 
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Dr. Hollerith in 1903 left the Bureau of the Census 
to found the Computing Tabulating Recording Company, - 
which later waa the nucleus of the Ifiitcsmational 
Business Machin^ Corporation. 

An example of a punched computer card Is shown 
in Figure 5:2. Careful ex^natlon of the card will 
^ reveal that the Hollerith Cod^ uses a single punch ^n 
-rows 0 through 9 to represent the digits 0 through 9, 
respectively. A punch in these rows is called a digit 
Jiunch, or a numej^ic punch. Alphabetic characters or 
letters are represented by two punches in the same 
colunm. One of these punches is Iti one of the rows 
12, 11, or 0 and ie called a zone punch, and the other 
is a digit punch in one of the rows 1 thru 9. Note 
that row 0 is called a zone punch for alphabetic * 
characters and. is called a digit punch for numbers. 
The codes for the alphabetic and numeric characters 
are depicted In Table 5,1. 

" Note that the zone 0 digit 1 punch Is not used 
for the letter S as you might expect but it is used ^ 
as the special character'/ or slash, S Is zone 0 
dlglb 2. 

There are also codes for special characters and/ 
or punctuatiion marks. These consist, of two digit 
punches, a single atone punch, or a asone punch and one 
or two digit punches, Tlie special characters that 
are used in Fortran IV are given in Table 5.2. 
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Zone punches 



Numeric or digit ^ 
punches 



Numeric • • ' Special 

|character8| • | Alphabetic characters I, , I oharaQterg 

- mm 



:;J: ra fnniRiB iiflinK!rfigii!Ttnj j ] } m 



tamiBoiri i.tTii \ mmmm 



^lOOiOOOOQOOOOOQOOOOOOO 



t: OOOOOgOOQOQOQOOOOOOOOOO 

I n n 1 i|n 1 n n t n ! I t|n n 1 11 ilpt n n 1 n 1 n m n 1 1 m 11 1 1 m|i n n n 11 1 i.i i n n f j 1 1 



bi 



g 3 3 3 3 3 3 3 31 3 3 3 3 3 3 3 3 3 3 3 3 31 3 3 3 3 3 3 3 3 1 3 3 3 3 3 3 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 1 3 3 3 11 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 33 

4 4 4444444144444444444 ^4 i44-444444|4444444|44444444444444|4'l444444444444444444444 4. 

5 5 5 5 5 5 5 5 5 5| 5 5 5 5 5 5 5 5 5 S 5 5 5|5 5 5 5 5 5 5 5 |5 5 5 5 5 55|5 5 5 5 5 5 5 5 5|5||5 8 5 5 5 5 5 5 5 5 5 5.5 5 5 5 5 5 5 5 5 5 5 5 5 




y 6 6 6 6 6 6\6 6 6 8|6 6 6 6 6 6fi6 6 6 6 6 6|6 6 6 6 6$<«6|G 6 6 6 6 6 6 |6 6 6 6 6 6 6 6 8|e66G66|6 6 6 6 8 6 6 6 6 6 6 6 GUG66&6 

H'8e 8 8 8 8 8 8 g| 8 8 8 8 8 8 8 8 8 S 8 8 8 |8{l8 8 8 6 3 8 i8S 8 8 8 8 8 |8 8 8 8 8 8 ||||||86|||8 8 8 8 e 8 8 8 8 8 8 8 8 8 U8S 

mm 9 9 9 9 9 9 1 9 9 9 9 9 8 9 9 9 9 9 9 9 19 9 3 9 9 9 9 9 |9 3 8 9 8 9 9 la 9 9 $ 9 9 9 8 9 9 9 9 9 9 9 9 9 9 9 a 8 9 9 9 9 9 9 9 9 9 9 9 9 9 

4 8 « > « * to It « U H »l« IJ II I910}| ?IJ3»»«»J3iI910 3l MMJ«31»3?ll«<B4HM3«445«4Me«»51MHMMMS>!iJ5J»W«O«1»SM«(H«I0 Jl 7» 73 14 Ji W » II 7)30 



« 

Figure 5.2. A punched computer card, showing punches for numeric, alphabetic, and some special 

characters used in Fortran, ' ^ 
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CHARACTER 


ZONE 
PUNCH 


DIGIT 
PI IMP H 




rUWv>n 


Ulbl i ^ 

PUNCH 


0 




0 * 








1 




1 

X 


T 
«J 


1 1 

JLX 


X 


2 










2 


3 ,. 




3 


1. 

JLi 


1 1 




4 




4 


M 


1 1 
XX 


A 


5 




•J 


M 


1 1 

XX 


5 


A 




o 


r\ 
U 


XX 


6 


7 




7 


P 
r 


. 11 


7 


8 




ft 

Q 




11 


8 






Q 


K 


11 


9 








c 

-• o - -- 


- 0 


2 


A 


12 


, 1 


T 

JL 


0 


3 


B 


JL A. 




U 




4 


r * 


1 9 


J 


V 


Q 


5 


• D 


12 


4 


w 


' 0 


6 


£ 


12 


5 


X 


0 


7 


F 


12 , 


6 ' 


Y 


0 


8 


G 


12 


7 


z- 


.0' 


9 


H" 


12 


8 








I 

p., i 


12 


9 









Tabie 5.1 
Punched card codes 



CHARACTER 


. ZONE 
PUNCH 


DIGIT 
PUNCH (ES) 


V 

• 


. Period or Decimal Point 


12 


3" - 8 




Left Parenthesis ^ 


12 


^ ^ ^ 






12 


' 6 - 8 




Minus or Dash ^ 


11 




$ 


Dollar 


11 


3-8 


- * , 


Asterisk * 


11 


' 4-8 


) 


Right- Parenth^asis 


11 


5' - 8 


i 


^Virgule or Slash . 


0 / 


1 ' 


> 


Cojmrta 


0 


3-8 




* 

Equal 


. I- 


6 8 



r — M.„,..,....>.i^ 

Table 5.2 
Punched card codes 
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The special characterH in Table 5 ♦ 3- are used in other pro- 
graiaming languages. 



t 

. CHARACTER 


ZONE 
PUNCH 




DIGIT / 
PUNCHES J 


& 


Ampersand 


12 






Cent 


12 

^ . 


ST- 8 


•-< 


Less .Than 


12 


4 - 8 


1 


Vejrtlcal Line^ 


12 


7 - 8 


1 


Exclamat ioja 


1 ^ 11 

i 


2-8 


> 


• * 

Semicolon - * 


f 11 


6-8 




Not 


11 


7 = 8 




Percent 


I 
1 

- 0 


A - 8 


— 


Break or Underscore 


0 . 


5-8 


> 


Greater Than 


0 


6-8 




Question Mark , * 


.0 


7-8 


* 


Colon 




2-8 




Number or Pound 




3-8 




Commercial At Sign 

• 




4-8- 


f 


Single Quote or Apostrophe 




5-8 


II 


Double Quote 




7-8 



Table 5*3 
Punched card codes 

■ * 

G. A pause for self evaluation. 

Take a short "time out" and see how you're doing so 
far* . . - * 
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1. Interpret the punched card shown in Figure 3.3. 




mm 



tDmtaaitnciUflmmmiataBitatnttita 



0 Q 0 0 0 0 0 0 0 0 0 0 0 0 0 0-0 0 0 Q 0 0 0 



t |0|00000000000000|OOOQ| 

I ' ' ' ' ' 1 1 1 ' ' ' > n 11 1 11 1 1 n n 1 1 1 1 1 1 1 1 1 n n 1 n 1 1 1 11 n 1 n 1 1 1 1 1 1 11 1 n 1 1 1 m 1 1 1 1 1 1 1 11 j n 

2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 1 2 2 22 2 2 2 2 22?? 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 
I 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 1 3 3 3 3 1 3 3 3 3 3 3 3 1 3 1 3 3 3 3 3 3 3 3 3 3*3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3-3 3 3 3 3 
^ 4 4| 444 4| 44444'J444444444444U4444444 4*4 4444444 4 4 444444444444444444444444444 4 444 4 44 
i 5 5 5|5| 5 5 5 5| 5 5 5 5 |55 5 5 5 | 5 5 5 5 b 5 5 5 5 5 5 | 5 5 5 5 5 5 5^5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 
« 6|66GG6G|66G6G6SSGGG 6 6 6 G6 6||6G 6 6 6 6 6 6 6 6 6 G 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 8 6fi6 6 6 G 6 6 6 6 6 6 6 6 6 6 6 G 6 6 6.6 66 
■ 77n777 7 7 7 7|7|7n7 7 7 7 7 7 7 7 7 7 7 7 77 nn7?n7?7 77777 777n 7 7 7 7 7 7 7 7 7 7 7 7 7 7? 7 7 7 7 ^ 7 7 7 7 777 
1,8 R| 8 3 8 8 8 8 8 S 8 8 8|8 e 8 1 3 8 1 e 8 g 8 8 8 S 8 1 8 II 8 8 8 8 8 8 8 8 8 8 8 8 ^ 8 8 8 8 8 8 8 8 8 8 8 8 8 8 B B 8 B 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 
9999199 9 9i9 999| 99 3 99 9 9 91 9989 19 999999999999999 99999999 9999 999 998999999 99999999999 



Figure 5.3. Interpret th^ punched card. 



2, Using the blank card shown in Figure 5.4 and a 

pencil » mark the punched card codes for the letters, 
of your name and the characters of your Social 
. Security number (including the dashes). 
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raiTiiTifniBfiRiRLninii^^ 



t: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 n Fi«iin*«Tfti«T«nin»n'nTarfTfTp^fi?iT'iM]M 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 9 o 
w n 1 1 J HM M I M 1 1! 1 1 1 1 1 1 1 1 1 1 1 1 1 n 1 1 1 1 1 1 . ! 1 11 1 1 n 1 1 1 n 1 1 1 1 1 1 1 M n n 11 m I m in n n 

i 2 2 2 2 2 2 2 2 2 2 ? 2 2 2 2 2 2 2 ??.'????????? 2 7 2 2 ;? 2 ? 2 7 ?; 2 2 2 ; 2 2 2 2 2 2 2-2 2 ? 2 ? 2 2 ? 2 2 2 2 2 ? 2 2 2 2 2 2 2 2 2 2? 2 2 

HI 

g 3 3 3 3 3 3 3 3 3 3 3 3 3 3 J 3 ;n 3 3 3 n J 3 3 3 3 i 3 3 J 3 3 J 3 3 J 3 J ;i J 3 3 3 3 3 3 3 3 3 3 3^3 3 3 3 3 3 3 33 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 
44444444444444444444444444444M444444444M4444'J444444444444444444444444444444444 
I 5 b b b 5 b 5 5 5 S 5 5 5 b 5 5 5 b S f, 'j S S b h h b 5 b & b r. b b b t. -J ' , 5 b b b 5 b 5 b 5 5 5 5 5 5 5 b b 5 5 b 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5 S 
a 8 6 S 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 (i 6 fi G B 6 6 fi 6 B 6 B 6 6 6 6 1. 6 6 b b B 6 B 6 G 6 6 G 6 6 8 6 G G 6 6 6 6 6 6 6 G 6 6 6 6 6 6 6 e 6 6 rS 6 G G 6 6 6 6 

1 1 "1 1 n 1 n 1 1 1 1 1 1 ] n 1 ij 1 1 ) I n 1 1 1 1 n 1 ] ] } ] ] 1 1 ] ] ^ ] ] J T J J yj J -ifj -j^-, ■] J T ■, -I -J ^ ^ 

8 « fl 8 8 8 8 8 8 8 8 8 8 3 8 8 3 8 8 fi 8 fi 8 8 8 8 8 8 8 8 8 3 a 8 8 8 8 8 8 8 tt a 8 8 8 8 8 8 8 8 8 8 8 8 8 a B 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 a 8 a 

9 9 9 9 9 9 $ 9 9 9 9 9 n S 9 S 9 9 9 9 9 9 9 9 8 9 9 9 9 9 9 9 a <1 9 9 S 9 ri 9 S 9 9 9 9 9 n 9 9^ 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 «> q q q q q Q ^ 



I n I? n 7< u K ?j M IS eo . 



Figure 5.4 

Blank card for marking your name and Social Security number 



If you feel that you're ready, then go ahead. If not, 
then back up and review the material. 



D. Tho Fortran statement card. 

There is a card printed especially .for Fortran shown In* 
Figure 5.5. (Of course, the computer doesn't know one 

c 

»-card from another; the various tyi^s and colors of cards 
^Ve of consequence only to the user for his convenience.) 
The card has various blocks of coluoMa labeled to aid 
you in punching Foreran programs properly. Column 1 muat 

• r 

^ have a "C" punched in it fot comments. Statement numbers 
re placed anywhere in columns 1-5. Fortran statements 
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Me 01 u 

J * 5 

2{2 2 2 2 
'lis 3 3 3 
4U 4 4 4 

(lie 6 6 B 

7j7 7 7 7 

PB 6 6 8 
I 

sjo 8 9 9 



ST- 



0 oTaii 0000 boo 0 00 

t n 1 1 m M n 1 1 u .1 m 1 1 1 1 m n n i m h g i m n n n t n n m n h n n i i 



FORTP^AN STATEME^NT 



IDBNI If K ATION 



M }f 7) r« n mvo 

n I n n 1 



22222222 
3 3 3 3 3 3 3 3 
,4 4 4 4 4 4 44 
b 5 5 5 b 5 5 b 



2 2 2 2 2 2 ?2'22??22;2??n2^ 2 2 2 2 2 2 2 ?222 2 2 2 2 2 2 j2 22 2 2 2 2 2 2?2222 2?22? 2 2 2 2 2 2 2 
3*3 3 3 3 3 3 3 3 3 3 3 3 113 J. n 3 30 3 3 3 3 3 3 3 3 3 n 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 
4 4 4 M4 4 4 4 4 4 4 4 4 4 M4'44M4 4444 4 4U44 4M4 4M4 444H 4 4 4 4 MM 4 4 4 4 4 4 4 4 4444 

6.6 6 6 6 6 6 6 666G6BBBfifi66G66BB 6 6 6 6 6 6 666C 6 6 6 6 6 06Gb68G 6 6 6 6 6 6 6 666G 6 6 6 6 6 6 6 6 6 6 6 6 6 6 G6 
7 7 7 7 7 n? /M7MnM;M7MM J ?Mn.n]M/M7n7n77H7?] 7 7 7 7 7 7 7 7 / 7 / 7 7 
88B 8 8 8 8 8 8 8 8 8 U 8 8 8 U8 8B 8 8 8 8 8 8 8 8 8 8 8 8-8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 



7 7 n 7 7 7 



9 9 9 9 9 9 9 9 

0 H 1^ H /? W fiC 



Figure 5.5. A Fortran statement card 



are placed any^vhere in columns 7-72. Columns 73-80 may be 
used In any way for purposes of Identification, such as pro- 
gram name, programmer's name or inltias, or sequence num- 
bers. Colunm 6 is used for indicating that a card is a 
continuation of the previous card. 

You will get some practice using- Fortran cards later, 

but- now you should be ready to take on the keypunch machine. 
•. . - ' <st> . " 

Punching computer cards?. \ ^ ^ 

The following instructlona wlir introduce you to the IBM 
model, 29 keypunch machine. Go through the instructions 
carefully until you can load carda,. punch something into 
some cards (for exampl©. your nam^, the dat©,.your social 
security number, etc.) duplicate a card, and^ clear the 



^1 



.'J 



nach 1 no . 





Noti.ee: . Some I lines pi>>,.3sing certain keys will caus© the 
macldne to lock u,,." Wl.en this happens, press the RKL 
key to rpl onflt? Ti\o ui.u hlne. 



J 



I. Keypunches ate loc ;Uea in MS 04, are\a light 
Ki-t'y color, .md .-ire Id'&itHied by a 29)on the 
nam« plato, on the upper fight-hand froJt of the 
machine, -.^rds are located in binj/placed among 
the machines. 

2. Turn mi the m.iin. switch located in front of 

\ 

your right knee ay you sit at the keyboard.^ 

3. Behind the name plate on the upper right is the 
'card hopper. The cards are held In place by a 
-spring- loaded plate,. Place cards neatly and 
securely into Che hopper in the upright posi- 
tion. <f 



4. Three buttons or keys on the right side of -the 

f 

keyboard, -KEL (releane), FEED, and RiSG (register) 
^ • and one switch on the left center of the panel 
of switches just above the keyboard, AUTO FEED, 
control the feeding of cards into the card 
Tliore are two ways to use theee controls: • 

a. AUTO FEED switch "OFF." Depress the* 
REL, 'FEED, and RE|5 kgys in that order. 
I'hla procedux-e allows the passage of 
one card at a time through the machine 




and Is useful for beginning users of 
the keypunch, 
b, AUTO FEED switch "ON/' Depress REL 
key twice just after yoy have loaded 
the card hopper > once thereafter. Use 

* 

onjy the REL key for automatic operation. 

When a card Is In place and Is ready to be punch- 

ed, characters may be placed in the card by use 

of the keyboard, which la similar to a standard 

typewriter keyboard. The column on the card 

currently being punched is Indicated by a pointer 

and a scale on a drum directly In front of the 

operator, upper center behind the window. In 

order to punch alphabetic characters and other 

characters on the lower portion of t)i^ keys, 

simply depress the proper key* In order to 

punch numbers and other characters on the upper 

portion of the keys, <3topress and hold the NUM 

(numeric shift) key, lower left of keyboard, and 

» 

then depress the proper key. . 

When a card la being punched, it IS. in place at 

BHH£!l station. When that card la released 
by pressing the release button (REL)* it moves 
from the punch station to the read or duplicate ' 
Station to^the left of the punch statipn. When^ 

the DUP. (duplicate) key, located in the middle 

''.%'■' 
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of tm top row» 1h depressed and held, the infor- 
mation punched In the card in the read position 
Is transferred to the card in the punch position.' 
An entire card may be duplicated; or part of it 
may be duplicated by releasing the DUP button, \ 
allowing cotrectione to be made. 

A card alao may be inserted by hand into 
the card track at the read station* There are 
two slots in the middle of the card track through 
which a card may be pushed until It is against 
the stop of the read station. Both the card to 
be duplicated and the blank card to be punched 
may ^e moved into position simultaneously with 
•the REG button. The easiest way to do this Is to 
have the cyird track empty, insert the card to be 
duplicated, depress the FEED button to feed a 
blaxik card into the punch station, depress the 

r- 

RE^G button, and then duplicate • 

7. At the completion of the job, CLEAR AXL CARDS 
FROM THE .MACHINE AND TH^ DESK TOP and turn the 
main switch to "OFF," (The card track may be 
clear^^d automatically by flipping the CLEAR 
swicch located at the tsxprBme right on the panel 
of switches above the keyboard to "ON.") 
Using tliese instruptlons , practice punching cardav duplicating 

i 

cards, and correcting errors. ' I 



ERIC 



5.15 

SELF EVALUATION FOR PART I. 

1. Punch your namo and social security number into a card. 
Begin your name In column 5 of the card and begin your 
social security number In column 50. 

2. Duplicate exactly the card you just punched. 

3. Punch OKIJUIONA Stt-ATE .UNIVERSITY In columns 11-35. Then 
correct the error punched in column 17 by duplicating the 
^rt that is c^jrrocC and repunching column 17. 

4. Find some Fortran statement cards in the bins beside some 
of the keypunches . Punch the Fortran statement 

I 4 XTAP«2.3*AyG/(21.0+B) 

\ 

in the proper columns of the card. The statement number 
4 goes anyx^here in columns 1-5; the Fortran statement goes 
anywhere in columns 7-72. - ' . 

5. Punch the Fortran program shown ;j^elow exactly as It appears, 
putting one line per card and punching the characters in 
the columns as shown. Do not expect to understand the pro- 
gram;, just punch it for now. The two lines of numbers 
above the program are the column numbers. For example, J 
indicates column 14 of the punched card; an "R" is pGnch- 

. ed in this column of the first card. The "O'?*' in the 
program are alashe^d (0) in order to distinguish them from 
aeros. Be sure to punch ssoro when you mean zero and "0" 
when you mean "O." 
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' .lUUUU 12222^2222g3a3933y>3544^^^'.4U445555555555666666666677777777778 

J2345g789ai23456789Ol2:)/4567890i>32» 5678901 234567890123456789012345678901234567890 
C0MPUPER Hl0GRAjM t^miTTliN IN K0KTltAN IV , V"- 

TRY1«2.I . * ■ V -;■ ; 

THY 3^0, 6^ \ 

ANS'*3.0*TRYitTKY2/(TRYl-TRY3^ l.' • •"*■ ••• 

WR^TE(6 ,4) ' ■• ^ 

F0RMAT(lHO.no: I ) ' . - " ' 

S!X0P . ■ • ... 

END ' . . . ■ ■ . ■ : : • 
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ChUck ih^ c-ari}» cMJj-eluHy for terrors and make coxrectlOBs 
a« nisieHsnry. Say*i the ccuds ; youVU be using thero aooft. 



PART II. Uo 



The* purpojse of documen t acion 'l.s HLUftimfed up in the following 

% ... 

lingerie : * " ' ^ . 



Johnoy f our 
One* ^tu'v 



/ 



uselfesvJ, day*. 



Exactly wha\\ izhat. program did \ 
* " . \ ' * • 

It 8ln\ply lildn^'t way! 




'Ii^order tor o progr.mi to be *-ot use, to any user, Including^^ 
thm .prograhiBier hiivjtjylt , 1 1 must be accopipanled by a fairly detail- 

f - ' ' ' t . 

ed« description: ^^S^^n^ th© ahort prasjrams ' that you will write 
for this course wlU He^m^it id require any docvitnentl^ion; but 
you need t{? , develop good hab Ita^^e^riy [ so documentation of all 
programs VI 11 be required. 

F, WhaC sJiould" be Inciudad in" docukentation? 

Program documentation conslat« of two parta*: 

•■*'_■ ^ . ■ 

(i). program coiraaisnts 
' • (il) program daacrlptlon 
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ConunentH In a program shoulU convey to the reader the 
essential facts of the program and should Include at 
the beginning of the program 

(a) the student's name > problem title, and date 
submitted; 

(b) a description of the problem; 
Cc) a description of the jprogram; 
(d) special or excepti<)nal conditions; 
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(e) definitions and l^ormats af input variables: 

(f) definitions and "formats of output variables; 

(g) definitions of other key variables; 

(h) error messages; * 

(i) key comments interspersed throughout the 
program. 

• • 

The accompanying program description should Include, 
\\rheo appropriate, 

(a) the problem 'title, the student's name, the 
date submitted, the unit number; 
^ (b) a brief description of the problem and the 
solution methods empiloyed; 

a description of the limitations of the pro- 

(d) a description of major variables and of all 

dimensional variables; 
(©) a description of possible errors and aesociat^ 

ed error mes&agas; 
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/ 

/ 

i 

<f) a compiets program listing iijcluding control 
^ cards, Input and output; 

(g) operating Instructions; 

(h) a flowchart at a level of detail aecesaary 
to convey the' essential information about 
€he program; 

^ ^^eecrlption of- key -point e -In the -flow 
diagram. 

The sample program on pages 5.20 to 5.22 illus- 
trates many of the points described. Notice that one 
^ line in the program listing cortesponds to one punch- 

ed card. The C wftich appears to the left of. the first 
several lines is punched in column 1 of a Fortran 
'^^^^^'^^^^t card. Such cards are called COMMENT cards. 
COMMENT ci^rds are printed on the program output list- 
ing, but aro ignored by the compiler. Fortran state- 
ments start in any column after column 7 of a state- 
ment card and may be punched from columns 7 to, 72. 
Statement numbers are punched in columns 1 to 5; 
» column 6, the continuation indicator column, la punch- 

ed if the statement ip^o long for the previous 
. • ^^^^ to be continued on the eurtent card. 

Sequential liae numbers appear on the far left 
of the printed listing. Comments do not have a line 
^oj^ examplQ, line number 0006 Is associated 
with the statement 

INDX « 1 ' • , • 

- ; .. • _ so , V 

er|c - • r 



which places the value 1 In the location assigned to 
variable called INDX* — ^ 

j^ote that the couiments at the beginning consist 
of the author's name , the date, a brief description 
of the program, input card ^Bcription, output card 
description, special operating instructions, and a 
description of tlie principal var^L^les. 



The comment cards interspersed throughout the 
program gives an indication of what the program Is 
supposed to do. This program generates the glossary 
listing that appears in Appendix II. The comment 
cards at the beginning of the program would have been 
easier to read if they had been set up like the terms 
and the definitions of the terms in the glossary • 
Comment cards with a aefies of special characters 
such as * and blank conuaent cards may be used to 
advantage. For example, one might have punched the 
comment cards in the following format. 



C 

C INPUT 

C CARDS ARE PUNCHED AS FOLLOWS: 

C ^COLUMNS CONTENTS 

C 1-11 KEY 

C 13--14 SEQUENCE NUMBERS 

C 16-80 . DEFINITION LINE 

C - ONE DEFINITION IS LIMITED TO 50 CAEDS.. 

C AAsStAA Asl^t^AA AAAAA 



Comments may be punched anyt^hete in cWumns 2-72. 

(Actually, columns 73-80 may also be used, but generally 

/ 
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0001 
0C02 

0003 

0004 
0005 
C006 
0007 

0008 

CCC9 

COlO 
COU 
0012 

0dl3 
0014 

oon^ 

CClt 
,0017 
JC018 

CC19 ' 



C 
C 
C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 



AUTHORS CH ARLE S FLU S 
CLASSs CriMSC NEW SruOFNTS 
DATES 18 AUG l^n 

BRIEF oeSCRiPTfONs fH! S PKUGRAH USES CARD INPUT C0NS!STIN6 
OF LINES IN A DEFINiTiOW Of A WORO.^ THF CARDS ARE KEYED AND 
SFOUPNCFn, THE CARnS ARe CHfCKFO FOR KEY AND SEQUENCE AND STOREOa 
IN AN ARRAY, WHFN #IF KfY CHANGES THE WORD DEFINITION IS PRINTED*^ 
AND THF PPOCFSS IS RFPfA^gO UNTIl^ ALL GLOSSARY ENTRIES HAVS BEEN 
WRITTEN. OUT OF SfcQUFNCt FNTR!FS ARE REPORTFO BY KEY ON AW ERROR 
tISTING AND FLUSHFt) FROM TUF ! MP UT , 'NO T . APPE ARI NG IN THE gToSSARY. 
INPUT; CARDS OF THE FORM; ^upo«i^i • 

COL l-ll KFY 

COL 13-1^ SEUUFNCf NUMBfR 
COL 16-80 OEFINlViON LINf 
ONE OEFINITinN IS ilMUEO SO CARDS 
QUTPUT? TWO U.btll INCH LiSTIhiGS. THF FIRST 
EACH PAGg T!TIFT) ANO NUMOfRfO, THt SECOND IS 

OPERATCN(J INSTRUCTIONS: STANDARD BATCH FORTRAN G LEVEL DECK 
SET-UP AND RUN PROCEDURES ARE USFO WITH THE ADDITION OF THE CARDS 
//GO,F T04F 001 no SYSOUT-A fOfi THE ERtOR LISTING, 
PRINCIPAL V ARIA BUS: M 
KEY 11 CHARACTER ARRAY FUR THE CURR^fc^KEY 



r 



IS 
AN 



THE QtOSSARY, 
ERI^Ort REPORT. 



KFYSV 
L INE 
LINES 
LNCNT 
IBLK 
LST 
INDK 



11 CHARACTER A^RAY f OR ?HE PREVIOUS KfY ^ 
65 CHARACTER FOR THE C URR FNT \dFF I Nl TI ON L I NE 
A 50 BY 65 ARRAY IVH Thi COMPl ET E tlj^F l^j I f |0N 
COUNTER, FOR" THE Nl'MbEH ClF LINES PRINTED PER PAGE 
A BLANK CHARACTEM CONSlANl 
FLAG FOR END Of PAT A 
- THE CURRENT SEOUENCJ NUMBER 



NUMBER or THF PREVIOUS LINE 



indksv seouenIf 
define arrays 

dimension key< iu^keysvcl il»line« 651 

common l i nes <50,6«> j 
initialize constants and counters 

DATA LNCNT/SS/, f ptK/^H /.aST/0/ 
INI TI ALI ZAT! ON READ 

READ (5,1) KFY«^ NDX^U'IMF Ul , J=l ,65) 



I FORMAT 
INDX=l 

GO TO II * . 

MAI N DATA READ 

^ 3 READ ( 5., I »ENn«99r KtYv!NDrX,C L?NE« Jl » 
CHECK FOR BLANK CARD, 9FS. RtJFCT IT 

. IE ..t KEY! 1 I .[ 0.. IBI Kl GO TO ^' 
CHECK FOR END OF DETINEf^ON 
, 60 5 t«l , I I 

IF (KEYSVdJ.NE/KEYUn GD TO 6 % 
§ CONTINUE 
SEQUENCI£ CHECK 

IF^ ( UNDXSV+l-lNOK), NE.O.OH. INDX«EQ*0» GO TO 
STQRE CURRENT LINF IN DEf INltlON ARRAY 
n 00 J ,65 • ^ - - 

7 L INE SIINOXWI ^LI^NE< n 1- 
STORE CURRENT KEY AND TNOX JN SAVE AREAS 

DO 12 I^i.U 
12 KEYSVI i >«KEV{ I ) , 

INOXSV^INDX 

GO TO 3 
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5,21 ;. 

CH6-CK FOR END OF PAGE- IF 'SO WRITE NEW HEADING • ' * . 

6 CALL PAGEf INOXSV«LNCNf 9!STRT». 
WRITE DEFINITION ON tISTING . ' * . 

DO 8 f «I STRT pINOXSV 

WRITE <6,98 (L!NES<UJJ,J«l,65) 

Format <8x,65au ^ 

8 CONTINUe 
CHeCK fOR END OF DATA 

IF UST.eoa) GO TO 100 ~ . 

KEEP 'LINE COUNT STRAIGHT, DON'T ALLOW PAGE OVERFLOW \ 

IF nLNCNT + INOXSV+21 .GT.55I GO TO 16 
SPACE GLOSSARY LISTING SO ITS PRETTY 

WRITE 10 > 

40 FXmHAT -iiHOr. ' ' - 

INCREASK LIN^ COUNT 

LNCNTs«LNCNT*IN0XSV>2 

GO TO 17 - 

18 LNCNT^55 ' , 

SEQUENCE CHECK 

17 IF (INOX.NE.n GO TO 4 ^ ' 
GO TP 1 1 

ERROR^ REPORT tt . • 

,4 WRITE «4»13J KEY * 

13 FORMAT ( IH /'THE GLOSSARY ENTRY WITH KEY «,11AI,» IS OUT OF SEQUEN 
ICE" > . 

FLUSH BAD DEFINITION . • • , , . , 

;D0 14 1=° U 11 ^ , ° ^ ' •■ 

14 KEYSVt n^KEY il) 

ih READ ( 5, 1 ,eND«100J KE Y , I NOX ^ ( L I NE IJ! t J«l ? 65 ) 
IF <KEY(ll-.eO,IBLKJ GO TO 16 

■ DO 15 'I 4 ,11 

IF «KEY^( n .NE.KEYUII GC TO l7 

15 CONTINUE' 

GO TO 16 • 
SET END OF DATA FLAG 

99 LST=»l ' * 

GO TO 6 , • \ 

100 STOP ^ 
END 
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0001 

0002 
0CO3 
0004 

0005 



0006 
C0Q7 

0008 
000«J 
0010 
^011 

0012 

0013 
0014 

0015 
0016 

C017 



. 0018 
0019 

r 



c 



c 
c 



. SUaROUTINE PAGEUNOXeLNCNT, I^TRT ! 

THIS SUBROUTINE WRITES PAGE HEADINGS AND KEEPS LlHt COUNT STRASGHT 
COHMO^ LINES<50,65) , 
DATA IPAGE/l/ 
!STftT«l 

IS TH6Re ROOM FOR ALL OF THE 06PINITI0N On'thIS PAGE 

IFI UNOX^-LNCNTS *L6.55) RETURN 
YES, RETURN AND PRINT IT 
NO»PR!NT AS MUCH- AS YOU CAN 

LNP0SS*S5-INCNT ' 

IF < LNP0SS.LE,2» GO TOl * . 

00 Z I«l ,LNPOSS " 

WftjTE ^6,^) (LINESU * J) ,J«1,65) 
3* FORMAT <8X,65Al) 
2 CONTINUE 

SET STARING POINT FOR REST .OF DEFINITION 

I STRT«LNPbsS*l 
WRITE NEW HEADINGS 
1 WRITE (6»4| IPAGE " 
4 FORMAT ( IHl ,33X*»C0MSC GLOSSARY* / ,37X, • PAGE ^13//} 
GET LINE COUNT STRAIGHT 
LNCNT^O 

IF{LNP0SS,GT%2I LNCNT«-LNPOSS 
UPDATE PAGE NUMBER 

IPAGE«IPAGE*1 
GO BACK 

RETURN ■ ^ * 

■ END . . 
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It is best to leave these colurans for oth^r uses.) 
With thl8 In mind, you may want to make your comments 
ytand but on the output listings All kinds of varia- 
tions may bo us^d 'to accomplish this, limited only by 
your Imagiuatlun and croatlvlty. (You may even wish 
to put graphic illustrations In your program with 
comment cards*) Two examples are shown bolow. 



COMMENT A^AiV^ ^AjVAA iiit^^^ 

C " * 

C * 

C PLACE YOUR MESSAGE ^ 

C FOR l^STERITY HERE. * 

C ^ 

C ^ \ 



cccccccccccccdccccccccccccccccccccccccccccccccGCcccccccccccccccccccccccc 

C* . AC 

C* THE OUTPin' TOKHAT FOR THE CORRECT ANSWERS IS CHANGED FOR EXACTLY AC 

C* TWENTY QUESTIONS PER ;i'EST. ' AC 

C* ■ , - ; .AC 

CAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA^^AAAAAAAAAC 

cecccccccccccccccccccccccccccccccccccecccccccccccccccccccccccccccccccccc 



SELF EVALUATION FOR PART II. 

0 * ' - ■ 

!• Describe a method of punching the first few comment c^rds 
of the .program on page 5.20 so that feach category stands 
^ out on the page . ^ ^ 

2. Writ© a set% of comment cards giving your mm^ this course 
"number, the dat^> and the objective of, this unit* 

3. Pu«ch the comment qarde that you wr^te tti 2, Place. them 
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with th© Fortran program that you puached for Part I.. 

» ■ .- . 

Save all thea@ cards . You ^^-e gradually producing a ' 

. ■»• 

job that you can ryin on the computer. 

«» 

PART III. Running the Job on the Computer. 



If you have corVectly performed the activities and s^lf 
evaluationfj in Parts I and XI of this unit, then you" have a 
documented Fortran program ready to be run on a computer. 
Refer to the ACTIVITIES~TA]^E for UNIT //5 for the procedure 
for doing this. 



ASSESSMENT- TASK:- 



) 



Actually, you have already completed the assessment, task by 
running your program on the computer. The documentation must be 
correct, the computer output must be correct, and you must have an 
00/80 listing of your program. Take thfe' program deck (leas control 
cards), th© printer output, and the listing to your instructor for 

« 

his 'approval • 



WHAT NEXT? You're nearly ready now d'o write your first program, 
but first you .must learn how to read and, write with the 
computer, that is. UNIT //6 tells you about that. 

♦ ■ • - V. ■ 
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UNIT #6 (COMS^ 



TITI^E: INPUT -AND OUTPUT 



RATIONALE ; 



V 



In onler foi" a computer to porfoxm uaalul work on data, 
•i^ U neoo«s«ry to "read" tlu,ue data ipto tha computer.! 
Similarly, in order to obtain the'reHults, it la necee- 
sarv tor the computer to "write" those results on so^e 
fopn of output m^idium. 'in this unit, yotf will dladover 
how to construct rather Simple Inpu^/output conun^nd^ in- 
Fortran, 



objectives: Wt.en you iinlnh this^unit. you will be able to construct 
input/output Fortran statements to ' ' 

(i) read data from data cards . 
. ■ ' ^^^^ ^'^^t^ results' on the output printer, 

(ill) carry out (l) and (ii) by means of FORMAT 
^ - .w - 

statements. 

* 

, You; .will also damonatrate your ability to construct a 

Fortran program with documental ion, and run it on a 
, c ompute^. 

PREREQUISITES: UNIT //5 ' . " 

ACTIVITIES; The term input/output will be used .throughout this 

. unit and will often be abbreviated I/O. ,The term is 
Applied to axid all inetructioiife kid processes.. 

' - • 6,1 " 
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related *to putting information into a ooinputer and 
getting Information out of a cor&puter. 

Int roduction 

In this unit you •will learn to conatruct Fortran 
REAJ), IaTRITE, and FORMAT statements. The ideas covered 
are implied by the follpwing questions. 



Wlaat to do? » (READ, WRITE) 

\-J\\ere to do it? (on an I/O devic©) 

How to do it? (by an appropriate FORMAT) 



For, a .given computer configuration, it may be 
possible to obtain input from several differeiDtt media, 

such as cards, Tnagn«ttlc tap©, magnjeitic disk, a typewriter, 

. ■■ ■ - ■ ^ > 
another computer, paper tape, eti^ Similarly, It "xpay be 

possible to place- the results on t^s^verj^ di^ffe^^ftt media, :. 

such as paper, cards, pap^r 'tape, Mia^gnetic tap©, magnetic"' 

disk, typewriter, another computer, etc. For tjK^ pi^es^eift 

■ ..." *^ 

w@ will make use of only' one typo of input m^'dium and on^. 
'type of output medium > namely , - " 

punched- cardB for input * " * :^ <^ 
• ^* 
and . 

the printed page for output,-. , '° 

■ . 
Figure 6,1 illustrates a computer with a card readter'-i'or 

« ■ • ■ 

input and a printer. f6r output*. ^ ^ 



CARDS 




.000 



COMPUTER. 




Figure 6.1, 



Schematic representation of a computet 
wlth its 1/0 units. 



2. 



READ and WKITE statements. - 

To read a data card, Fortran statements of the form 

P 

READ(u,f) li§£ ^ ' 

are used. To write a line on the line printei^, Fortran 
stai:ement8 of the form " " . ' . 



WRITE(u,f ) 



and 



WRITE$u,f) list 
are uJied. The parameter u designates an I/O unit number 
or an integer variable name which' takes -on the value^of 
the I/O unit number.. 'The parameter is the statement 
^number of the corresp-ondlng FORMAT statement, and list 
irefer^ to a variable jjame .or t6 several variable tiamea 
separated .by eoimnas. Each of these parameters will be 
• discussed 'in det^l lii t^e following' pai-agraphs. 



The I/O" ^n;tt number u Is <3eternilned by the computer 



fjyatQm being uaad. Table 6-.1 identifl©© the (init numbers 
that you need for running programs • , \ 



u 


WATFIV 
FORTRAN 


360 

FORTRAN IV 


1130 
FORTRAN IV 


READ 
(card reader) 




5 ^ 


2 


WRITE 
(line printer) 


6 


6 


1 



Table 6*A\ Pfertran I/O Unit Numbers 



Examples of WATFIV Fortran READ andJJRITE statements 
arfe ahown In Figure 6.2. 



1971 
123 
321 



READ(5,123) A,B,C 
WRITE(5,321) A,B,C,D,INO 
WRITE(6,1971) 

FORMAT (you will j^lnd out what goes here in the pages ahead) 
FORMAT (you will finc^ Out what goes here in the pagea** ahead) 
FORM^T(you will find out what goes her^a in th© pages ahead) 



Figurei 6.2. Examples of WATFIV READ and WRITE statements.' 



Examples of 1130 Fortran READ and WRITE etatemants 
are shown in Figure 6o3»* 



44.4 
13 



READ(2,44A) I,A,Y 
WRITEd ,1.3) A,B 

TFORMAT(you will find (Uit whnt goos here in the paged ahead) 
FORMAT(you will find out what goes here in the pages ahead) 



Figure 6.3. lixamplea of 1130 Fortran ftEAI) and WRITE statement©. 



By using the vailable 1/0 unit numbed in the READ and 

WRITE statements, converwion irom one comt^ter system to 
« 

another Is eftected with minimal effort. In Figure 6. A is 
shown the program segment taken from Figure 6.3 in a form 
that can be used on either WATFIV or 1X30 Fortran simply 
by changing the first two aBslgnmejat statements. 



C ll|30 FOKTRi\N 
IN-2 . 
10UT"»1 



READ(IH,444)I,A,Y 
WRI'1'K(I0UT,13)A,B ) 

' jr----ii -v~-[- 



C WAllFIV 
IN«5 



I0UT«6 

KEAD(IN,444)I,A,Y 
WiaTEaOUT,13)A,B 



Figure 6.4. Uau of variable I/O unit numbers to 
facilitate- "changing from one computer system to another. 



An 6van better v>7ay ^Is shbi^m £n Figvire 6;5, using the 
DATA in,ltializai[^on statement, a non^ecutable statement 
that lAVitlallaes variables at the timo the program is com- 
jpiled'. The OAX/^; statement generally reducei? executloh and 
compile time ai\d alwcon8©£;vo8 storage in the computer. 
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since machine inatructione for IN«2 And IOU'r«l do not have 
to be set i^p,, stored, and executed. Use the DATA statement 
for initializing constants in a program whenever possible. 



C 11 



0 FORTRAN 

DATA IN,I0UT/2,1/ 

READ ( IN, AAA) I, A, Y 

WRITE(I0UT,13)A,B 







C W^IFIV 



DATA IN,XOUT/5,6/ 
READ<IN,AA4)I,A,Y 
WRITJ3:(I0UT,13)A,B 



Figure 6.5. Using the DATA initialization statement 
for Initializing variable I/O unit numbers. 



, The DATA statement can be written in other ways. For 
example, 

DATA IN/2/,I0UT/l/ 
is equally acceptable. Notice that In both .ways of writing 
the statement the constants are always to, the right of their 
respective variable names and are contained within slashed. 
There must b^ a one-to-one correspondence between vari^le 

names and "constants • 
« ti - 

The., list of a READ or -WRITE statement is of arbitrary 
f length; fiowever, It: visually Is easier, for the jnovice pro- 
grammer to manage a psogram that has several READ or WRITE 
statements with short lists and several simple FORMAT* state- ' 
ments , rather than one READ or WRITE x^th 'a long list and 
\ a complex FORMAT statemefit. For this roaeon, several READ 
WRITE 8t;&tement8 with short list^ may be' preferred to 

♦ 

one READ or WRITE srtJ^tement with a long list. With add!- 
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' « tlonal experience m writing ^nd debugging (correcting, 
finding the errors la) Input/output statements, you will 
develop a style that i« effective for you. 

The parameter i refers to a VoRMAT stafiement which 
gives the form of the I/O record. For our purpo.es, an 
Input record la a computer card, and an output record is 

line of print on the line printer. In other word«. the 
FORMAT statement describe, the format or layout' of a recprd. 

3. FORMAT Statements 

The FORMAT statement describes the detailed layout of 
.either data on data cards or the output on the line ^pri^ter . 
When reading data, it indicate-s 

■J 

^ > (1) when, to get a new data card, 

(II) which columns of the data card are associatfed " 
with each Variable, 

(ill) which columns of the data card are to be skipped, 
and - 

(W) the Held de3j^ri£t^ be associated with the 
data field. 

Wlien printing on the- line" printer, the FORMAT statement 
loadicates - 

(i) when to begin printing on a new page,* 

(ii) when to double apace befor^ printing, , * 

(lii) when to single space before printing, ' ' ^ 

(iv) when to print headings and what headings to 
V- ■ ■ - 
print , ' • ' '* . ^ 
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0 



3 



6,8 



•-A 



(v) where to pilnt the values'on a line, 
(vi) the field dea crip tor to bo ataaociated with the 
. values , and 

(vii) the number of print positlona to' use to print 
a value. 



/^^he J. leld' desc r lptor Is used as a teiupLata or mpplng 
to transl^^te between an internal machine respresentat ion of 
the data (usually In ^he bliiary number system) to an exter- 
nal "people compatible" representation of the data (usually- 
In terraB of alphabetic char^^cters and the base ten nunjber 
system). The field deacript^rs and their corresponding 
/Actions used in thiq unit are given in Table "^.2 
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Field 
Descriptor. 


Action \^^^ 


Iw 


Perform integer conversion from or to a 
field whose width is w columns. 


IV. d 


Perform real conversion from or to a i 
field 'Whose width is w columns with ^ j 
places to the right oT the decimal 
point. ' 

Same as Vu,d except for exponential. 
form. ^ 


Ew.d 


nX 


Omit next n columns from a data*card dr 
insert n blank characters into an out-- j 
put line* * ! 


nH 

t 

d 


Print the n characters (including blanks) 
Immediately following the H in ihe next 
n positions on tha output line. 

■ 


• ' Table 


6.2. Field Descriptors and Actions. 


* 
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EXAMPLES 



\ 



\ 



Given the input data card (where 1^ represents a 



blank) , 



card colunms: 
punched values: 



111111X1112222 
1234567890123A567890123 
UMZmsO . 72l5tJl2345678 



the REAi) statement mid its aeaoclated FORMAT stati^itoent 



6,9 




J- 



kt:AD(5,13l) l,hyhS^,Y ^ 
FOiiMAT(l5,F8.2,F5.1-,l2,F3.0) 



set th'e variables in the READ stateflie^it to the respective 





values 








« 


I: 


A92 


col. 


'i-5 


• 


*• 

A: 


30.72 


col. 


6-13'' 




B: 


"12'. 3: 


col. 


14-18 




K: 


45 


col. ' 


19-20 




Y: 


678. 


col. 


2i-:^3 



For Che same data card the READ stateiinent aa'^' ,lts associated 



FORlf'lAT statement 



U 



READ(5,11) I,A;B»K,y . 
FORHAr<l2,F3.1,3X,FS'.l,2X,ra,,aX,F|\0) \ 



stet the variables -to the respective values 
*I: 00 col. 1-2 



iil^ank" data columns 
•ajce converted as 
' aeros 



Qcr 



Az 49. 2 
B: 30.72 



Kf 12 
Y: 56. 



col. 3-5 
col. 9-13 



c6l. L6-17 



col. 20-21 



a decimal ^joint 
punched In* a <\ata 
card takG$ prece- 
dence over' that In- . 
dlcated in the 



the ranialnde1^3.of 
the card la Ignored 



'Hie WRITE statement with its associated FORMAT state- 
ment m means blank) ^ 



9^76 



WR1T]^(6,9876) 

FORMAT <lHl,'5X,25HIDENTIFICATION|(OR]!mEADING) 



prints • } 



IDENTXFrCATION OR HEADING 



IhVint ^positions 6 through .30 at the top of a new page. 
The same may. be i*freefiipllph6d by the statements 



^3 



WRITEj:6,430 " 

rOR>lAa'(3iJM:]^l{J(^(l(IIDENTIFICATlONtJORtiHEADING 




" iSi£Sl28t character irt a iSrint Una is not. actually 

printed » but controls the ©pacfhg bet^ween lltiee of priixt,' if 

^ prlfxtinrls on a line printer,. (This statement is no^> tVu© ' 
for th€i typewriji;er/prlnter used on the .U30., ft>r.exampl©.> 



You must designa;;© what^'^ee into that character; other- 
wise, chaos may result ^ The first field descriptor type 
encountei^ed in a FORMA,!' statement, scanning from left to 
right, musJt be an H. iThe first character to the, right of 
the first H. controls ehe spacing between lines of pij-int. . 
Table 6.3 gives the^ -gbmmonly used control character^. 



CARRIAGE CONTROL 
CHARACTER 



0 

blank 
+ ' 



ACTldN 



Skip to the top of the next 
page before printing, 

Double space before printing. 

^Single space before printing. 

Print on the current line. 



6.3. Carriage control characters for the line printer, 



G)irven the FORMAT Iptatemisnts 




121 
123 
125 



FORMAT (Iril , 20X , 2^HCAL^:NDAR^F0RVTHEiiM0m-H) 
FORMAT (IHO , 26X , 9HSEPTEMBER) 

FORMATdH ;21X,lHS^H>to,2X,lHT,2X,lHW,2X,lHT, 
2X,1HF,2X,1HS,/) 



the WRITE instructions 



1 



WRITE (6, 12 I) 
WRITE {^,123) 
WRTO(6,12S)" 



\ 




Instruct th© line printer to print the following headings 
,it'che 'top of the next page. (NOTE: FORMAT statement 125. 
Is p<inched on niojre than one card. To signal that a card is 
to be d continuation of a previous card, a punch is placed 
in cplutnn 6, called the continuation colvtom. AltKough any 
punch except zero in column 6 slgnifieg continuation, the 
digit punches 1, 2, 3, . , . simplify keeping track of the 
number of continuation cards, APPENDIX I gives the number 
of continuation cards allowed.) 



20 blanks 



CAI^ENDAR FOR THE MONTH 
SEPTEMBER 
S M T W T F S ' 



<r~ leftmost print position 



Let's look in detail at these three statements, 

t 



WRITE(6»121) 



IHl: carriage 'control positions the paper so that priiitlng 
wHl start at the top of th^ nejtt page*. 



20X4. places ^0 blank characters the next 20 print 
positions. 

22H: places the ii.%haracters f611owing the H into the 
next 22 print loeitions. 

Be sure the character count preceding the H is correct. 
In this example t;he 22H Indicates that the 22 charac- 
ters immedl/ately foUowing the H are to' be printed. If 
the character count is tt>o email, the coajpiler doesn't 
. approve; and if the charact^K count is too large, the 
next- field de8crip^or or a right parenthesis might get 
swallowed. Count carefully! 

In FORMAT 121, if 20H had been used instead of 22H, 
the compiler w,puld not know how to interpret the char- 
acters TH (in MOhTH) and would indicate an error. Also, 
if 26H had been used, the right parenthesis would have 
been included in the strijig of characters to be printed. 
Then; as the compiler continued to scan to the right, -it 
• would not f liid a rlg^t parenthesis and would 'signal that 
an error had been cotnraitted. 

♦ 



WRITE(6,123) 



IHO 



carriage control spaces the paper up t^o lines for 
printing (double-space printing). 



26X: places 26 blank characters In'^the next 26 print 
positions. 

9H: places the next 9 characters following the H intp 
the next 9 print positions. " 



WRITE(6,125) 



\ 



IHIi: carriage dontrol spaces the paper' up one line for 
printing (single-space prinjting). 

2IXc places 21 blank chajraccers into the n^jttj 21 print 
positions. . - • ;' . . 

IHS: places S inttf^ th'e next pVint position. 
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2X: places 2 blank characters Into the next 2 print 
poaitlons, 

etc. 

r 

IHS: places S into the' next^ print position, 
/: inserts a blank line.* 

A alash.pt end of 'recoi;d indicator., tellte the printer to skip to 
the next record Indicated by the carj?iXge- control following it. 
A slash followed by 'a right-hand parenthesis a^ctually defines 
® fecord . Sine© a blank record contains a blank carriage 

control, then single spacing Results, producing 9ne blank line. 
A FORMAT of the general form ^ ' \ 

n F0RMAT(/1HVJ, . . . ) 
introduces a blank line before printing (double spacing) , while' 

n FORMAT (/IHO,- . . . ) * 
intrpduces two blank. lines before printing (triple spacing), 
which can albo be accomplished by 
n FORMAT (//IHtJ, . . * . ) 
Notice that in an output FORMAT a carriage control is required 
after a slash, unless there is a right parenthesis or another 
slash (both of which Indicate a blank record or line) imnediiately 
following the slash. ^ ' 

e 

Similarly, * ^ • • » . 

n F0RMAT<1H>(» , . . /) 

4 

introduces a blank line after printing, and 

n FOimATdHV,^. . . //) 
introduces two blank lines" after printing. 

' n* FORMAT (M, . . . /W, . . . ) 

. . loo . 




^introduces no blank li«ee, dimply .kipping , to the n^t single 
spaced record, * • 

n FORMATd^, . , . //IHM, . . . )' 

and • ' ^^1^ 

n FORMAT <1H></^. . ,,/lHO,\ . . ) 
both introduce a blank line (double spacing) between the two 
printed lines. y . 

n FORMATdHM, . . . ///iHfe(, . , ) • 
and 

n FORMATdHM, . . . //IHO, . . . ) 
UBth introduce two blank/ liaes or'trlple spacing. 

Vertical spacing on) the page ^ with vax^ious comblnatiooa 
of slashes and carriage controls is limited only by your ' 
Itxgonuity and yoyr neads. 

• Slashes may also be used in input FORMAT statements, 
meaning to skip to the next card. .„ 

^ A systematic way of numbering FORMAT s-tatements Is desirable. 
By placing all FORMAT st.temant^ at the beginning or end 6f a pro- 
gram and setting aslde^ a^set of- statement numbers ior FORMAT state 
ments. it -is easy to add.' delate, or use a previous FORMAT state- 
ment. Such ^ convention is extremely useful for debugging pur-^ 



po 



Morcj discussion of I/O statements is contained in UNIT V/ll, 
but yqu know enoug^^ no.^ to construct and use' simple. 1/0 instruc- 



4 

Refer to UNIT #6 A^IVITIES TABLE,. Activity 1. 
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5. Miox^ you can construct a complete Fortran prograii. you must 
be able to ten the computer when to stop compiling the program 
and when to atop the execution of the program. 

The END statement ter^inate^ the end of the compile or 
tiranelation phase and^must go at this physical end of your pro- 
gram. The END statement tens the compiler program ihat ther.e • ; 
are no more Fortran statements to compile or translate. 

» 

The STOP or CALL EXIT statement terminates the execution 
phase an4 must be at the logical end of your program - that la, 
at the end of the flow through the flowchart of the program. 
It is the last Fortran statement executed. 

While the statements CALL EXIT and STOP both terMnate the 
execution of the program, their functions may differ sllg-btly on 
* different machines. 

Basically the intent of the CALL EXIT stat^ement is to termi- 
nate execution of the program a'nd to return control of . the'^mputer 
. back to the monitor program that la "In charge" of the overall opera 
tlon. allowing the computer to receive another job. STOP, on" the 
other hand, not only termlnktea the execution ot the iJrogram,- but - 
may also arrest the total operation of the computer so that It 
raudt be restarted with the START button befor© another Job can be 
processed. 

^ On the IBM^ISO computer (MS 214) you should preferably uee ' 
the CALL EXIT statement;' otherwise, t^e Computer muftt be -reata^ted. 

On the IBM System 360, you. may use either CALL kXIT or STOy 
since the compiler is programmed to interpret both st"atement8 m 
returning coatrol baqk to th« monitor program. On WAIPIV, ^owevar, 

/ ■ IQ2 • 




it is possible tcy receive a diagnostic warning if the CALL EXIT 
^statement ia iimaediateXy followed by ENDt (The reasons for this 
are probably too sophisticated for you right now. If you t^&ily 
want to kngw^ ask an instructor.) Vour program is npt -incorrect 
if this warning message appears. 

In flummary, use STOP or CALL EXIT (warning possible) on the 
360; preferably use CALL EXIT on the 1130. 

I . . , ... 

SELF EVALUATION: You should noi^ be ready to construct Fortran 

f» » 
programs using I/O statements and run them on 

a computer, liefer to UNIT #6 ACTIVITIES TABLE, 

Activities 2 and 3. V 
» 

ASSESSMENT TA$,K: Please see your Instructor, You will be raquired^ 

to construct a Fortran program using I/O state- 
menta and run it on both the 36^Q^and the 11^. 

WHAT NEXT? You are now ready to tackle serious programming., making 
use of the computer's deciaion making capability. Continue with 
Unit 8. ^ • • ' , 
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UNIT i»8 (COMSC) 



TITtE: CONDITIONAL BRANCHING OR TRANSFER STATEMENTS 

RATIONALE: One of the powerful capabilities of a computor is its 
afiJLlity to make certain logical "decisions" ^ that is, 
its ability to do a certain sat of operations under a 
certain condition and to do some alternate set of operas- 
tions if som© alternate condition prevails* In this 
unit you will learn how to use Fortran for decision-^ 
making. . . 

'i • 

OBJECTIVE: At the end of this unit yoO wlH >e able to construct 

• • * 

the four conditional transfer statements in Fort-ran -• 

„ - ' 

- . the computed GO TO, the assigned GO TOr tl\e arithmetic 

IF, and thd logical IF - and to construct and follow 
the logic of program segrcflanta that make use of thea^ 
statements* 

* V 

PREREQUISITES: UNIT //6 ^ « ' 

ACTIVItlES: The first set of activities (A^D) is intended to 
acquaint you with the forms of the four types of 

* 

cond^^ltlonal ^trans^f er statementi^ and how these stater 
mmtB operate.. Activities E-G am intended to show 
you how and when thja four statenienta may be used in 
actuaX' problem solving situations; a sample problem • 



8a 
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Ig givea, and fivei sanipl© programs are used to illus- 

* » * 

trate the statements. 

Ck>mputed GO TO. 

Already you have been Introduced to the unconditional 
q6 to statement.. In this unit you will learn about two 

i 

more GO TO stateinenta In which the transfer is conditional, 

jrather than unconditional. The flrst'^of these is the com- 
! \ 
|juted GO TO, and -the second is the assigned GO, TO. 

Refer to the UNIT #8 ACTIVITIES TABLE, Activity 1. 

I 

* Several things about computed GO TO statements need ' 
special emphasis : 

1. In }the general form of the computed GO TO-, 

"go TO (nj. ttj, ...» nj^),i 

± ia called the index and must be an Int eger name. 
It must also be ££g5eded b^ a c oiama . 

2. The relationship between the index and the state- 
pent numbers in the list, n^, n^,, n^^, is'' 

' positional . That is, when the index is one, the 

* 

first statement number is msed; when the index is 
t\<fo^ the' second statement number is used; otc* 

3. Normally the value of the Index §hould not be 
allowed to exceed the number of statement numbers 
In thfe list, (l^ifk) In IBM System/360 FORTRAN, 
howWer, if the value of the index does exceed the 
number of statement numbers In the list, then the 



first execvitabl^ statement following the coftj^ted GO 
TO is executed. 

4, Tlie value of the index is never allowed to ^ero or 
negative* 

B. Ast^igned GO Tg. 

The assigned GO TO la probably less often used than 

the cdmputecJ GO TO, and it is not available ox\ all com- 

1 * pilers. (The assigned GO TO is not available In 1130 % 

N_ Fortran . ) * 

. Refer to UNIT #8 ACTIVITIES TABLE, Activity i. 

I 

Whian the assigned GO TO Is used, the index, which la 
i^ in the general form 



do TO 



lO 1, (ttj , n^ , L . , Hj) ■ 



mu$t have^ previously been assigned one of the statement 
numbers contained Ir^ the list ,by use of an ASSIGN state- 
ffi^t. The index is not related^o the poeitions of the 
Statement numbers j, as in' the case of the computed GO TO; 
but. transfer is to the statement number in the list which 
has been assigned to the index. 
' In general, the computed GO TO can be used to accomplish, 

anything that the assigned GO TO can do, as you'll see in 
the example later in this unit. 

C. Arithmetic IF. • 

The arithmetic IF Is an especially important condi- 



tional transfer statement. While* the computed GO TO and, 
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th<@ assigned GO TO allow any number 6f possible transffersj 
th© arithmetic IF provides bronchiujrg only for the conditions 
of negative, Siero, and positive* 

Refer 'to UNIT #8 ACTIVITIES TABLE,. Activity 3. 

The arithmetic expression jb in the general form 

to * • " 

1 

IF ^(e^ n^ >n2^T33 

can be arr^ valid integer or real arithmetic expression. For 
example, ^ ^ 

;tF (X*A4+3,0/X) 5,6,20 
is a valid IF statement, as is 

1F(N)10,30,5 -'• ■ 

Two of the cortUitions may cause transfer ^o the same 
statenieivtt In other words, a statement number may be used 
twice. For Example, , ^ 
1^ IFU)5,5,10 

causes transfer to statement number 5 if thfe argument is 

% 

I 

negative or zero and to statement number 10 if the argu- 

At 

^ / , ■ V 

ment is positi^/e. ' ^ 

Logical IF , ^ - 

iXnother type of I^statement, the logiCjg^IF, is 

available with many computer systems. (The logical IF is 
available in IBM 1130 Foi*tran,>, The logical IF branches 

on one of two condition?, depending upon whether the argu- 

ment is true or false-. 

Refer to UNIT j?8 ACTIVITIES T^BL)^, Activity 4. 

« 
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ThQre.dr© three. main pitfalls in''usl«E. the logical 



1. IC the argument ca^ot be determined to be tme 
or false, an evrox will result. Whenever you 
writ© a logical IF, ask yourself 'the question, 

J » 

"Is the argument true ot fajtse?"- • 

For axampl^^ . . ♦ . 

IF(5>*N)G0 TO'6 , . ^ 



Is not cpri^bct./^ Is true ox f^l®AVv..-*'%^^^^ 
Actually, it^s nonsense eWn t6'ii%^K ^1^^^^*^^^^^^-^^^ 
On the other hand, ^ . ' 



IF(5.GT.N)G0 TO 6 

is correct. 'Whether 5 is greater than N (the "true" 
case), or hot (the "false" caae), can be determined 
immediately when the value of N is known. 
I. Lack of' understanding of the operation of the logl- - 
calx IF can cause incorrect results in a prograln. Fix 
in mind firmly the paths of ©Kecution in the logical ^ 

■*. * o 

■ IF. 

» 

Suppose and represent two executable 

Fortp«n statements. Here is a flowchart for the 

general form of the logical IF 

IF(e)S •' 
S 

provided that Si is not & transfer statement:. 

# 
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.Notice that only m executed If the argume^at is 
false, but that, both Sj^ and (in that order) are 
executed if the argument is true. 

Of course, if S/is a^. transfer statetuent, then 

only $2 will be executed if the argument iq, galse, 

■ " V 

and only Sj wij.1 be executed if tHg^a-tgument^^^^true. 
Here is a flowchart for the general form 



i 



XF(e)GO TO 5 

So 




False 



Do you see anything wong with th© following , 
stj^tementa? , ^ 



IF(N.GT.5)G0 TO 2 
2 N«m-1 .* 
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You should! Look at a flowchart for the state- 
went8. ; 



False 





The statement N«>Nfl is executed if the* argument is 
true; it is also executed if the ^frgument is false! 
Nonsense! The IF statement might as well have been 
left out! 
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E» Puttlng^'lt all together. 

HoxiT do you decldfe what type of conditional transfer 
statement to use? The answer to that questidn is deter- 
mimd by the pfobleip itselt and In part by your prefer- 



/ 



enca. 
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In gen^it'al, assuming that the logical IF is av^iil- 
able on the computer y/u aKeXslng, J-oglc^l IF's and 

- / 

arithmetic IP's can be used Intorchafigeably . This is 
particularly txw^ if q^ly two branches from the fi^rlth- 
motic IF are baiujj i^ed* For example > . ^ 

7 



could be u0ed/intex;changeably with 

/(X.iGT>0.0)GO TO 7 

fei^ent //5 goe^ hero. 



!tat 



[F(L)LE.0.0)GO TO 5 
St/atj^ment //7 goes here. 



If all th 
usedj^ how 
required. 



(branches of the arithmetic IF are being 



(ive^-, then two 'logical IF statements are 
Fbr example, 

.1 

XF<X)5,6,7 

and ^ ^ . 

IF(X,GT.0.0)GO TO 7 
IF(X.KQ.0,0)GO TO 6 
Statement #5 goes here. 



could be used interchangeably. 

The -computed GO TO 4.8 particularly useful when 

« 

several branches are needed, especially if the condi- 
tion of transfer is based on consecutive integiers. For 
OKaaple, suppose that you wish to make a count of .stu- 
dents who ar© freshmen {coded 10, sophomores (coded 2), 



Juniors (coded 3), and aenlors (co^ed A). One computed 
GO TO can teat for all four cases and transfer to the 
proper county. This la much simpler tjian using three 
logical IF's or two arithmetic IP's which ^dld be re- 
quired to accomplish the same task. ^ , ■ 

T\\e assigned GO TO Is very general, sine© state- 
meat number assignments aro detQrminod by whatever con- 
ditions the programmer wishes. It does i\ot depend upon 
consecutive integers as the computed GO TO does; it does 
not check just for positive, negative, or zero or just 
for true or falafe. Ajxy set of predetermined conditions 
may be used for statement number assignments for the 
index of the assigned GO TO. As already pointed out, 
however, the same thing can be accomplished by assign- 
ing values to the index of the computed GO TO. 

F. ' Simple counters. 

^ In a moment we'll look at an example that illus- ' 

t rates the conditional transfer statements. But before 
we do that, you need to 'know about simple Integer counters 
Refer to UNIT-y/8 ACTIVITIES TABLE, Activity 5. 

G. A sample program. » 

Now let's look at some programs which make use of 
IF, computed GO TO, and assigned GO TO statements. These 
programs will also illustrate the use of a simple integer 
counter. Her© is a statement of th6 problem: 

Supp^^^d^e have k set of data cards, each of which 

* ^ 

\ 



ha© a student's name ^jnd JU number^ and hi© age, 
sex, and classification punched In the col\iians 
V shown below. 

Columns 1 - 20 r Name 

Columns 22-25: ID number 

Columns 26 - 27: Age 

Column 28: 1 foiM^es\iman 

2 for sophomore 

3 for junior 

... ff 
^^^or sehior 

Column 29: X for fem^ile 

2 for male f 

3 for last card 

■ We want a list of ID numbers and a he^d count of 
male students w are freshmen or sophomores or 
who are upder 21. . ' 

There are' a number of ways to program the solution 
of this problem; we will examii^ five programs with 
their flowchftrts. FigUre 8.1 shows a solution that 
uses only arithi^^tic IF statements for decisions, and 
Fi^re 8.2 Ci(>ntains the satoe program using only logical 
IF statements. Figure 8.3 shows a program using arith^ 
acetic IF and computed GO TO statements for decisions, 
while Figure 8»4 shows a progiram using logical IF and 
computed GO TO statements for decisions o Finally i in 
Figure 8»^. decisions are made with logical IF, computed 
GO T0> atv4 assigned GO TO statements • v 

U3 ■ 

/ t 



li 



— ■■' ^ ^ — ^ * 

Initialise counter ^ 




r 





Read ID, I AGE, 
KLASS,ISEX , 





DATA IN,I01IT/5,^S/ 

10'READ(3;»,X)ID,,IAGE;' 

IF (TSEX-2) 10,11,12 
12, STOP 

11 IP(KLASS-2)8,8,13 ' 
13 lF(IAGE~2n8,10,10 
8,K0UNT«K0UNW-1 

WRITE(I0UT,2)K0UNT,ID 
GO TO 10 

1 FORMAT(2lX,l4,i2,2Il) 

2 FORMAT (IH ,I5,1H. ,2X,I4) 

END 



^ 



Figure 8,1.- Program using only arithmetic IF statement for decisions. 





DATA IN,IOUT/5,6/,KOUNa70/ 

10 read(in,1)id,iage,klass,isex 
. if(isex.eq.3)st0p 
if(isex.ne7^)go to 10 " 

1F<KLASS.LE.2)G0 TO '8 v 

IF(IAGE,GE,21)'G0 TO 10 
8 KOUNMOUNT+1 

WRITE(I0UT,2)K0UNT,ID , ^ ' 

GO TO 10 ■ - ' -■'^ 

. 1 F0RMAT(21X, 14, 12,211) 
2 F0Ri4AT(lH ,X5,1H. ,2X,i^) 

END 

The program can also be written with only two IF 
statements. 

DATA IN,IOUT/5,6/,KOUNT/0/ 
10 READ(IN,l)ID,IAGE,iaASS,ISEX 
IF<ISEX.EQ.3)ST0P . 

IF(ISEX,NE.2,OR.KLASS,GT,2.AND.IAGE.GE.21) 

$ , GO TO 10 

KOUNTVKOUNT+l' - ' 

- WRITE(I0UT,2)K0UNT,ID 

GO TO 10 
1 F0]?mT(21X, 14,12,211) 
a FORMATdH ,I5,1H,,2X,I4) 

END 
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Figure 8.2.' Programs using only logical IF -statetnents for 
decision©. (Thesa programs cannot he rjan^n the IBH 1130 
coraputex: because of the logical IF statemert^fs.) 




^ DATA IN,IOUT/5i6/,KOUNT/0/ ' 

10 READ<IN,1)II),IAGE,KLASS,ISEX 
GO TO (10,11. 12), ISEX 

12 STOP 

11 IF(KUSS-2)8,8,13 

13 IIi:(IAGMl)8,10»10 
8 K0UNT*»K0UN'IH-1 

m Ti; ( lOUT , 2 ) KOUNT , ID 
GO TO 10 i -^C " 

1 FORMAT (21X, 14, 12, 2 XI r 

2 FORMATdH ,15,1H. .2X,I4) N 

END 



Figure 8»3. Program using computed GO TO and 
arithmetic IF. statements for decisions ♦ 



jL ^ 




< 



LKiA IN,IOUT/5,6/,K0UNT/0/ 

10 INDEX-1 

9 READ(IN,1)ID,IAGE,KLASS,ISEX 
GO TO (9,11,12),ISEX 
12 STOP 

11 IF(KLASS»LE*2)INDEX«2 
IF ( I AGE . LT . 2 1 ) INDEX» 2 
GO TO (9, 8), INDEX 

8 KOUNT«KOUNTfl 

WRITE (lOUT , 2 )KOUNT , ID 
GO TO 10 , 

1 FORMAT (21X,IA, 12,211) 

2 FORMATdH ,I5,1H. ,2X,I4) 
END 



Figure 8.4. Program using caraputed GO TO and 
logiiial IF statements for decisions. (This 
program cannot be run on the IBM 1130 computer 
because of the logical IF statements.) 
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Start 



I 



Xnltiftlise counter^ 



ASSIGN 9 TO INDEX 



Read ID.IAGE, 
jtLASS,IS£X 






1. 



ASSIGN 8 TO INDEX 



' ~ ~ 1 1 T 1 w I -^ Mi ■! ti > I ' 1 1 I J r 1 1 1 1 »i I » 

Increment cpunterj 



3E 



Write count, IP 



DATA IN4oUT,KOUNT/5,6,0/ 

10 ASSIGN 9 TO INDEX ^ 

9 READ<IN,1)ID,IAGE,KLASS,ISEX 
GO TO(9,lI,12y.ISEX 
12 STOP 

11 IF<KLASS.LE.2)ASSIGN 8 TO INDEX 
IF(IAGE,LT,2)ASSIGN 8 TO INDEX 
GO TO INDEX, (9,8) 

8 KOUNT^-KOUNTM-l 

WKITE(10UT,2)K0UNT,ID 
GO TO 10 

1 FORMAT(21X,I4,I2,2U) 

2 FORMATCIH , 15 ,1^. ,ax, 14) 
END 



J 



Figure 8.5. Program using computed GO TO i= assigned 
GO TO, and logical IF atatesaenta. (This progratn 
cannot be run ot» the IBM 1130 computer because of 
the logical IF -and assigned GO TO atatcmients*) 
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8.16 



/ 

. \ ■ 

Which of these program© cannot be run on th© 1130 
computer and why? 




SELF EVALUA^^ Write a Fortran program for printing the Dean's 

List, The data input will consist of a set of 
data cards, each containing a student's ID num- 
^U^r^C columns 1-5),. the student s classification 
code (column 6, explained in the table below), 
the number of hours in which he is enrolled 
(columns 7 and 8), and his.gVade point s^verage 
(coluran's^^^9-43, decimal point punched with three 
digits to ci\e right of the decimal point). 



ERIC 



C lassificAtiop 
Freshman 
Sophomore 
Junior 
Sedior 
Special 



Code 
1 
2 
3 
4 
5 



123 



4 




order to quf 



In order to qualify for th© Dean^e List > suppose 
that a student must be a freshxnan, ^ophbmora, 
junior, or senior; must be enrolled In twelve or 
more hours; and must have a grade point average 
of 3»50 or better. 

The last card 'will hav^ only a 6 punched in 
colunm 6 where the classification code is punched* 

The program is to ^paka a list of ID numbers 
and grade point averages of students who qualify 
for the Dean's List* Terminate execution when the 
last card is encountered. 

Use at least one computed GO TO, at least 
one logical IF, and at least one arithmetic IF - 
in your program. 

Run your program on the 360 computer until 
it is corr-ect. Punch the set of test data shown, 
below for trying out your program. 



11111111112 
12345678901234567890" 

111114163.678 
222221152.678 
333332123.500 
444443104.000 
555555163.^.50 
666663181. §75" 
777772133.750 
6 



ASSESSMENT TASK: Turn in to your Instructor the printer output and 

the program deck for the problem you worked In the 
> 

self evaluation section. 
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Your Instructor will give you additional 
asaessment tasks • You will b© requ;jtr€id to con- 
Struct onq^ or more Fortran programs and/or pro- 
gram segments making uae of conditional c^TVansfer 
atatements. 



WHAT NEXT? Go ahead to UNIT #9. 
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UNIT #9 (COMSC) 
TITLE: ARRAYS AND SUBSCRIPTED VARIABLES 



/ 



RATIONALE: In order to handle large groupsi] of data which ©hare 

some common characteristic > such as points on a curve 
or grade point averages of students enrolled in a unl-** 
varsity » some means of grouping these data together under 
a single variable nam^, recognizing that the data share 
a conmxon characteristic, and aome means of referring to 
specific data items, recogniseing the uniqueness of each 
data item, are needed. In Fortran, arraysr and subscripts 
are used for this purpose. 

OBJECTIVE: At the end of this lesson you will be able to construct 
a Fortran program that makes use of one-dimensional ^d/ 
or two-dimensional arrays. 



fREREQUISITES: UNIff //8. 




ACTIVITIES: Activities A, B, and C are designed for students who 

cannot identify |;he terms Bubscrlpt and element as used 
in a set (or an array) of items. If a set of .values of 
% containing n elements in the notation 

X^) K3) • • t» " 

and if a aet of values of x containing n rows aad in 
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. (■ 

columns in the notation 





^.2 


*i,3 • ' 


» • X , 




X 

2 »2 


2,3 






^3,2 


3 y 3 
> • 


' * ^3, TO 




^.2 


^.3 • " 





are meaningful to you, then skip to Activity D, page 9.6 
If these notations are not meaningful to you, then go 
through Activities A-C. Activity A describes arrays; 
Activity B describes subscripts for arrays of one dimen- 
sion; aAd A^rfe^rity C describes arrays of two and three 
dimonsions. * \ 

What is an array? An Array is simDly a group of Itmes with 
some common property, /A doaen^g^s is an array of eggs, 
sharing the cotamon property of "eggness." A group of red 
things is an array (k red things, sharing the common property 
of "redness," People can be grouped Into arrays in many 
ways: an array males and an array of females; an array 
of tall people and an array of short people, provided that 
tall and short are properly defined; an array of blue-eyed 
people and an array of brown-eyed people; an array of red- 
halted people, an array of blond-haired people, and an array 
of all the rest J or slraply an toay of people. 

In FottJjran, arrays are usually composed of numbers; 
but they may also be composed of alphameric data, alpha^ 




9,3 



lucLiu ■j.i\k\ !?'iniv! 1^ il.'i ' i t'*'* t y^M-s <>i" data. Vox 

(^K.iniplc, it Wi- wt'.r i on . ! 1 i n,>. an aiiav <n>nlaintu^ the k^-^'^^*-' 



pohiL avcia^!;ej ^'1 t; l » J. u < . wc w<.;uld Uavc ,.in rti uiy ol real 




ia an .ur.iv tuc^ ruierrod to. 



B, V!\^.\{ \ ^ a Ma».rj :|^m .' \ suL . i ij-t is ai^ i ! >iN^^tM\ uumluM t h^t 

i[^^^\^'v\':^.■■\ \i\i\^\l^K Iv |.-.>{i;«pa i u iUiay ot an individual 



1 1. I 



» hil l' I {\\ \i a .»ul)Ska i j)t i s a 



s ill a c.aiLtui, repre- 



J 




r 



d I a^\t a:.- , ' . . V , t. a j ,v I 
Sup j" f ♦ j Iia ( . ' ' 



a !> ' L I a r y iiianuo r ; buf. 



I • Ms', , a. , i vid Ja .'u;t*d i n t\\v 
►'Mr , . a { va>n vca i.cnl • 



Yi>u cuiraiiU\ iia'.-H^ u dMJMtiits di>iu^', ihcU. , do you'l Kgg 
nunibt.M '} uujt|aelv ^m''-" ^ ^ * » '■\y t'^'is^^f^ in the third posi- 



Klinx wviAk i-i U.MvMira' point that wan at'bi--' 

tinri iy (Ji-^sfo) • o in i i »k! >■ ,, 'il i tht* tM her egga arf untquyly 
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specif ied by the number of 'the poalVjlon In which -each «gg 
1@ located. 

Considering* th^© eggs aa an aryay of ©ggs» can re- 
^er to the posltiona^^ numbers as Qubscri|>t8, W© could refor 
t© the egg in the ^^d^pxig^tlon as ©gg^ , read as ©gg sub- 
three, ." ■ . — ^ 

Example 2, Consider the days of the year. Xhey too 
form a,xi jarxay ^ and each day is uniquely specified by a num- 
ber. For exappl©, th© birthday of Abraham Lincoln 1® the 
43rd day of th@ year. (It's also February 12, of course; 
we'll consider that notation later.) In array jargon, w© 
could say that Abe was born on day;, 3 or day-sub-forty-three. 

Example 3, Consider the seats in an auditorium as an 
array of seats. Suppose that you ^re assigned seat number 
108, or fleat-sub-one-hundred-elght. That seat number defines 
uniquely a position in the auditorium in which you may sit. 

Do you now have a firm gr^sp on Che notion ©^subscripts 
as positional numbers? If liot, ponder the-_&a£^ples again. 
If so, then consider this qu^s^yoiu^JpiSes it raakA sense to 
speak of position 5 1/2 in the ©gg carton or seat ^.32 in 
the auditorium? Hopefully you answered, "Certainly aoti" 
In the definition of subscripts at the beginning of Activity 
2, a subscript was said to be integer j that restriction should 
wake sense to you now. 

Tlie- arrays considered in this section are said to be 
oner'diroenslonal arrays because they have one subscript or 
om posit iofiial niunber- associated with each position in the 



arrays* There are olh^x ways of looking at tha positlone 

r 

In arrays, however; one of these will be considered in the 
next section* 

Let* 8 go back ^ to th© eggs and number them in a,diff©r^iat 
way . 



Row 2 



Row 1 




Clearly, there -aro two rows of eggs, each containing six 
egga. We can specify uniquely any egg in the carton now by 
stating two positional numbers; for example, the third egg 
-on row one is.egg^^g or ©gg-sub-one-three . (The row number 
iQ arbitrarily stated first • ) 

^^^^^Cojisider again th© year as an array of days. The year 
can also be thought of as being divided into groups of days, 
or months. Thus,- the 43rd day of the year may also be re- 
ferred to by saying "the 12th day of the 2nd month," or day^^ 
having two positional numbers. 

ibr consider the seats of an auditorium. They may be 
numbered by row and by seat row 5, seat A, for- example, 
or seatg . ' ^ 

"Ay 

In ithese examples, two positional' numbers or subscripts 
were used in order to identify uniquely each position in the 
array. S^ch a system of numbering is said to be t wo -dimen" 
slonal, and the arrays are two -dimettsional arrays. 
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9,6 

I \ Wliether on array is one-dlmensional or two-dimensional 



Is really a master of preference. Certain/typea of problw 
\ may, however , b0 more easily acconraodated by a one-dlmeaslonal 



Array, while for others a two-dimensional array may be better 
One-dimensional arrays do require less execution time in the 
' computer. 

What about the eggs in the carton? Both one*- and two- 
dimensional arrays cai'i conveniently be used. In other words, 
to think of the eggs as twelve eggs or as two rows of six 
>.©ggs each makes little difference probably. But with the 
year considered as an array of days, we usually prefer to 
think in terms of a two-dimensional array — that is, monthis 
and days. , . " 

* In the case of the seats 1^ an auditorium, .it 's definite- 
ly easier to find a seat if you are given the row^ and the , 
seat number; rather than just a- Single number for the seat. 

There are also array® of more than two dimensions. For 
example, w© could think of the year in terms of months, Xi?eek8, 
and days. The third ^ay of the second week of the sixth month 
would be designated day^ ^^a, having three subscripts. Or the 
seats of the auditorium might be divided into sectional rows, 
and seats. We might have section 1, row 5, ^eat 3, designated 
. seatj 'g^^. ThesjB are axj^ples of three- dimensional a rrays . 
D. Refer to UNIT If 9 ACTIVITIES TABLE, Activity 1. 

SELF EVALUATIONj Refer to'imiT #9 ACTIVITIES TABLE, Activities 2 and 

3. ' 
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ASSESSMENT TASK: Pleas© see your instructor. You will b© required 

to writ© a Fortran progr^am making us© of arrays 
and run it 6n a computet. 



WHAT NEXT? Handling arrays in the problems in this unit hae been 
rather cunibersome. In UNIT tflO you will learn a simpler way of 
handling arrays. 
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UNIT Ho (COMSC) 

TITLE: LOOPS 

' ' ' » 

RATIONALE: On© of th© great Assets of a computer is the ability to 

^®P®^t a set of operations" t ime and Tim© again. Many 
applications in data processing and problem solving re- 
quire iterative procedures, that la, procedures requir- 
ing repetition of all or parts of a program. The term 
usually applied to such repetitive operatl«^nB is looj^M 

i22E£» I« this unit you will learn more about loop- 
ing in Fortran. You will also get a better handle on 
• ^ making use of arrays in programs, 

OBJECTIVE: At the end of this unit you will be able to construct 
Fortran program loops, using the DO statement. 

PREREQUISITESi UWIT #9 ' 
ACTIVITIES : 

A. Suppose that you were given the task of wltlng a program 
segment that would find the sum of the elements of a one- 
dimensional array. One solution to the problem Is shoxm in 
Figure 10,1. A flowchart Is shown in Figure 10.2. 

Notice that a logical IF might b© used Instead of the 
arithmetic IF in line 5. What logical IP would you use? 



10.1 
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10.2 



X 
2 

A 
5 

6 



CA*A*A PROGIUM SEGMENT FOR SUMMING WAftAA 
CAAA** THE N ELEMENTS. OF THE^ARRAY A, ***** 
C***** USING K FOR THE COUN™. AAAA* 

CAAAAA INITIALIZE SUM AND COUNTER. 
SUM-a.O 

CAAAAA PERFORM THE SU>tMING. 

2 SUM«SUM+A(K) 

CAAAAA INCREMENT COUNTER AND TEST IT. 
K«K+1 

■nF(K-N)2,2,3 ■ . . • 

CAAAAA SUMMING CO^^PLETED. WRITE fcuLTS. 

3 WRITE (6, 10) SUM 



Figure 10.1. Program for summing elements of an arra 



J. 



Yes 



Initialize 
counter 
and Sum 



Accumulate 
sun 




Figure 10* 2. Flowchart for summing elements of an array 
showing loop^ 
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tet's analy»© the program o©gm©nt carefully, using the 
line numbers in the left margin. Lines 3 « 5 form a program 
loop, that i^j^ Q^t of statements that are repeatod. In thjj 
case, the loop i© to b© oxecuted N times, ainca there are N 
elements in the array to be added into the sum. After the N 
elements have been added, the looping is discontinued; and; 
in this particular program segment, the WRITE stateo^nt at 
line 6 is executed* ^ 

There are three statements altogether that control the 
looping: linea 2, 4, and 5 of the program segment. The 
three statements initialize, increment, and test the cou^nter. 

Th©j:e are three keywords here: Inltlalig!^ » - Increment 
and test. Don't forget them, because you will use them later, 



Initialize, increment , test. 



Fortran provides a special statement for looping that 
handle© the detail^ of loop control fpr the programmer. • This 
'statement is th© DO statement. The three, control statementa " 
In the program segment (line^^ 2, 4, and 5) that initialize » . 
increment, and teet th© counter can be replaced with a single 
DO statement illustrated in Hguire 10.3. A floxirchart is B.ho\m 
in Figure 10.4. In the DO statement;", "K^ljNjl" contains the 
three control functions: "R""!" initializes the counter to 1; 
"N" serves as the test value (that is, as long as KsN, looping 
will continue); the laat'"l" serves as the- increment value . 



C PRC GRAM SEGM3SNT FOR SUMMING 
C IHE N ELEHENTS OF AN ARRAY, 
C USING A DO STATEMENT. 
SUM«0.0 
BO 2 K«1,N,1 
SUM«SUM+A(K) 
2 GONTINUE 

WRITE <6, 10) SUM 



Figure 10.3. Program aegment with d6 
atatement for looping. 




Figur© 10.4. Flowchart for sununing N 
elements of an array, using -a DO loop. 



(that is, K is Incremented by one each time)* The first 
part of the W statement, "DO^^," defines thjQ tang© of the - 
loop, consisting of the statements Immediately following 
the DO statement dox^m to and i^ncludlnjg^ statODiient nimber 2. 
In this ^particular case, the range conaiets of two state*- 
tnents. (The CONTINUE Btatement Is actually optional In 
this case; we could have placed the statement number 2 on ^ 
SUM««SUM+A(K) and omitted the CONTINUE statement. The pur- 
pose of CONTINUE will be discussed later.) ^ 

¥hen the locking is completed, that is, when K is no 
longer less than or equal to N (K Is greater than in 
other words), then the first executable statement following 

the last statement in the range of the DO is executed. In 

« 

the example, the WRITE statement v/ould be executed. 

The CONTINUE statement is' a 'useful way to delimit the 
range of a DO. It also provides a way of visually delimit-- 
ing DO ranges by allowing the **body" of a DO range tp be in- 
dented from the DO and the CONTINUE statements. 

Place the following program 8€yjjnent in parenthesized- or 



)eune 
5 Sta 



indented format. Place a CONTINUE statement at the- end of 
each DO loop. (See the last page of this unit for the solu- 
tion. ) ^ 

DO 17 I«1,N 

DO 13 K«1,N 

SUM«0. 

DO 15 J"1,N 
15 SUM«SUM+A(I,J)*B(J,.K) 
13 C<1,J)"SUM 

17 CONTXNU& * . 
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Refer fco Activity 1 o/ UWIT #10 ACTIVITIES TABLE/* ' ' 
Looping can be accompliished in other ways besides that of 
using the DO statement. You have Seen one way already in 
the s^iiiple prograxn in F.lgure I0.1,,in which a counter and 

i 

an IF i^Jtatement were used. 

Scjune loops ara handled more easily with DO statements, 
such a^ in the program segment in Figure 10, 3. But some 
loops ire handled more easily by u§ing a single conditional 
transfeir statement* — an IF statement or a computed GO TO 
statemeLtj^ for example. Let us consider a problem illus*- 
tratlngj looping without a DO statements* ^ 

Sujppose that wa are to use a computer for compiling 
the Deaji's .List> and suppose that a student must have a 
grade point average of 3.0 or better In order to be on the 



Dean^d 



iiSt* 



Also suppose that there is one data card per 
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student » each of which contains a five-digit ID number in 
columno 1-5, th© student's classsif ication in coluim 6 (1 
for freshman > 2 for sophomore, 3 for junior, and h for 
senior), and tha grva^d© point average in columns 7-11 (deci- 
mal point punched). If the enrollment i© very large* it 
would be inconvenient to count the cards so that th© exact 
number would be known; it%QuldPb© more convenient to plac^ 
a ''sentinal'' card or a ^^trailer" card at the end of the data 
cards and program the computer to recognize that card as the 
last (^rd. One x-zay to do this would be to place a card with 
a 5 punciled in column 6, the classification column, at the 
end of the data. Since only 1, 2, 3, and 4 are legitimate 
classification codes, a 5 can be used to teripdnate the loop. 
A computed GO TO is very useful for this purpose. 

A program to prepare the Dean's List is shown in Figure 
10.5. The flowchart Is shown in Figure 10.6. This example 
la similar to th© problera-f or self evaluation in UNIT #8. 



C PBfjGRAM FOR COMPILING THE DEAN'S LIST 

20 READ(5,1)ID,KLASS,GPA 

1 FORMAT(l5sIl»F5.3) 
GO TO(10,10,10,10,11)»KLASS 

11 STOP 

10 IF(GPA-3.0)20,21»21 

21 WRITE (6, 2) ID, GPA 

2 FORMAT (IH ,I5,2X,F5.3) 
GO TO 20 r 
END . 



Flgi|sa 10.5, Pro|ram looping controlled by a computed GO TO. 



13!) 




Figure 10.6, Flowchart for Dean's List piroblem. 

Notice In the computed GO TO that ,eKecutlon is termi- 
nated whenever the class if ligation is 5, but that looping 

< 

continues as 3,ong as the classification is 1, 2, 3, or 4. 
The computed GO TO could, of course, be replaced with 
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an IF stacem^nt. For exjaraple, tho arithmetic IF 

♦ v» 

IF (KLASS-5) 10,11,11 

or Lho logical IF 

IF(KLASS.GT.4)ST0P 

could be usesd. 

There are uorae alternate x^^aya of checking for th^^ 
card in this example. We could have used a blank card for 
the trailer card and checked for a claasif Icatlon of zero or 
for an ID number of zero. (Remember that blank numeric fields 
Are read as zeros when the computer reads the data cards.) 
Another waf" would be to place a "nonsense" number, such ae 
9.0, In the flald containing the grade point average and 
check for that. 

The point of this exampl© is simply this: looping may 
be accomplished njore easily iti some cases without the use of 
DO statements. * 

How do you decide whether to loop with a DO or t6 use 
some other means of looping? Here is a "simpl© rule of 
thumb" to help you decide: 

If the loop makes use of a counter, then probably you 

should use a DO. 
If th© looping la controlled by some coxidition based 
on tha .input- data or some condition set j)y th© pro- 
gram » usually tasted by some conditional transfer 
statement, then probably you should not use "^a DO. 
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This rul© is certainly "not absolute, however > ^and should 
be applied only as a kind of starting point. 

SELF EVALUATION: ^ 

A. Refer to UNIT #10 ACTIVITIES TABLE, Activity 2. 

B. Refer to UNIT HO ACTIVITIES TABLE, Activity 3. 

€• Write a program segment that will find the sum of the ©le-- 
fnents of a two-dimensional array containing N rowa and M 
columns, (Answer on next page..) 
f 

ASSESSMENT TASKS; Plaaae see your instructor. You will be given 

a problam-£or which you are to. construct a For- 
tran program, makingT^lBisn&T one or more DO loops, 
and run it on a computer. 

WHAT NEXT? You may go to UNIT //II or to UNIT #13. 



/ 



lis 



Answors to probloma in the text of UNIT #10 



IWDEI^ITING THE "BODY" OF 
THE RANGE OF A DO LOOP. 

'd0 17 1«1.N 
D.0 13 K»1»N 
SUM»0. 
D0 15 J«1,N 

SUM«SUM+A(I,J)*B(J,K) 
15 CONTINUE 

-C(L,J)»^UM 

13 C0NTINUE 
17 C0NTINUE 



SELF EVALUATION C. 

ASSUME^>THAT N<11 AND THAT M<21. 

DIMENSI0N Ado, 20) 
SUMMING CAN BE DONE BY R0W3 OR BY COLUMNS. 
EXAMPLE OF SUMMING ACROSS ROWS. 
SUM^O.O 
D0 10 X-1,N 
D0 11 J«1,M 

SUM«SUM+A(I,J) 

11 C0NTINUE 
lb C0NTINUE 

EXAMPLE OF SUMMING DOWN COLUMNS. 
SUM«0.0 ■ 
D0 12 J-1,M 
D0 13 I«1,N 
SUM«SU>HA(I,J) 
13 C0NTINUE 

12 C0NTINUE 



UNIT on (COMSC) 
TITLE: INPUT, OUTPUT, FORMATS 

RATIONALE: Although the input/output discussions in UNIT #6 (COMSC) 
" -should provida the esBcintials "f of reMlng data and print-" 

ing results on the line printer, there ar© additional 
' features that provide simplifications or capabilities 
that are, useful. As in UNIT #6 (COMSC), the card reader 
will be used for input^ and the line printer will be used 
for output. ' . 

When you complete thris unit you ar© well on your 
way toward being able to use Fortran aS an effective 
computational tool. Many of the programs which you 
develop in the remaln4er of this course should be use- 
ful to you throughout your college career • Wa feel that 
being able to understand and write computer programs is 
one of the most Important skills that you can laarn^ It 
ia almost of the same level of importance as the ability 
to coimnunicate effectively both in oral and written form* 
There is an appendix th^t summarizes FORMAT state- i 

9 ^ V 

nients at the end of this unit. 

OBJECTIVES; Vdien you finish this unit, you will be able to construct 
Fortran IV READ and WRITE statements ajj^ their assoclat-- 
\ 0d FORMAT statements to handle a variety of input/output 



situations. 



PREREQUISITES: UNIT illO (COMSC), 

ACTIVITIES: You should make use of a variety of READ, WRITE, and 



FORMAT statemehte In the programs required by the other 
COMSC uniti3*. Thi0 will help you to become proficient 
in performing the tasks of reading and writing* It also 



* able form* Furtherraore, by inserting temporary WRITE 
statements at key points in your program^ you should 
be able to debug the program much faster than by trust- 
ing to luck. ° 

Format field descriptors covered in UNIT #6 (COMSC) 



F, I, X. 

Additional format field descriptors covered in this unit 
are 



Other format field descriptors (L, T, Z) exist > but x^ill 
not be covered in this IP! sequence. Also covered in 
this unit are Input^ and output of array data. 
NOTE: THE MOST SIGNIFIGANl' DIFFERENCES IN FORTRAN 
IMPLEMEaiTATIONS FOR VARIOUS MACHINES ARE MOST LIKELY 



TO OCCUR IN INPUT/OUTPUT PROVISIONS. In other worda^ 
FORMAT statements that work on one compiler may not 
necessarily work on another. 

Recall that input/output statements are of the 



will help you to organise an^ present results in a read*- 



were 



A, D, E, G. 
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form 



READ 
WRITE 



(u,f) Hat 



where "u" ia an I/O unit number » "f" la a format state- 
ment number, and "list" may be empty or , contain a list 
of variable -names. Each variable nam© in the list re- 
quires an associated 'field descriptor of type A, I, D, 
E , Fa or G to be aresmit. in _ the^-EOHMAT -a tatement -speci- 
fied by "f." Literal, H» and X field descriptors ara 
not associated with variable names in the list. 

How ar© the field descriptors and the items in the 
I/O list coordinated? Each action of format control 
depends on information jointly provided by the neitft ele- 
ment of the input/output list, If one exists, and the 
next field descriptor obtained from the FORMAT statement, 
If there>i8 an input/output list, at least one field - 
descriptor other than 'literal', H; or -X must exist. 
Stated more simply, if you tell the computer to write 
or raad the value associated with a variable' name , then 
you must provide a field descriptor for that value In 
the FORMAT statement. As an example, consider the 
statements written in symbolic form in the following 
example. 



REA0(54Xl)€i,€2,«3,€j,,€5,€6 '\ 

Xll FORMAT(.6,,5X,62.63/6^,4aOX,6s)) 
113 • FORMAT(lHO,4iC,2HA«,6j,//2(6„,63)) 
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As a urn© 

t^iptmmtB a list elsment,, 
r€kpre3©nt© a list element » 
represents a field descriptott 

One© the tuad statement iu invoked, the j[bint action 
proceeds aa follows: 

jetton ^aqtuence -ligt elament — ' f iald descriptor — 

1 ^' ^ . . 6j 

■* * ^ • . 

2 5X (5 columns 

skipped) 

. 3^" 6, ^ 

5 -I (read next 

card) 



■X 



7' lOX (10 coXumns 

. skipped) 
* I 

8 eg 6g 

9 . lOX 

10 £e «8 

11 input list exhausted 



Simllarlj?^, whan the write statement is invoked, the 
action p^roeeeds as follows: 



action s^quanc© lt©t olamGnt flgld descriptor 



1 • . ^ IHO (double 8pac© 

^ before print) 

2 . . 4X (blMhka placeid 
. - ^ In ^ext 4 

print po8l« 
^ ^ tiona) 

3 • J2HA«" (iu8©rt8 A* 

' ^ In naxt two 
print posin 
tlons) . 



} I (doub|,le apace 
, ' before print) 

r 

" 6^ (watch this; 

the left most 
' . character to 

be printed is 
a carriage con- 
trol charac'cer 
and must be a 
blank) 



8 A, 6, 

12 '* list exhausted 



NOTE: A field des9r'iptor must agree wlt,h the data type 
of its associated variable In the I/O list. For example, 
the descriptor I musj; b© used wltfh an Integer variable 
aame. ' ' 

^To be more specific » coa^ldar the statewBnts 
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REM>(5»121) W,Y,K,J,A 

FOR>1AT(F10.3,4X„F6.4,2(3X.I5)/F10.6,F6.3,I4) 



The correspondltig action sequence follows J 
action ,/ sequence 



/ 



1 

n 

2 
3 
4 
5 
6 
7 
6 

.'9 
10 



list element 



W 



Y 



K 



A 



list exhaiffated 



field descriptor 
F10.3 
4X 

F6.4 



3X 
^1 



15 



3X 



15 



I (advance to 
next datM 
card) ■ . 



F10,6 



(the rest of 
the field" 
descriptors 
are ignored) 



/ 



NOTE: TlTie field -descriptors 

2(3X,I5)^ 
may also be written &s 

3X ji XS y 3X y 13, 

^ Complete the actjk)n sequence for the fallowing 
t ■■ * li ' 

Fortran ^statemerits. ' - ■ 
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ttRITE(j6.196)I.J»AvX»P 
F0mT(lH1.39X»16HQUARXERLY REP0RT/ 

13H0 INCREMENT « ,IS,3X,8HINDEX « ,IA, 
llllAMT, EXTv- ,2FiO.2,5X,9HPR0FlT « , 

^ X ^ • IE ^ 



action sequence 



1 



list element 



field 



3 
4 

5 

< 

6 

7 

8 

9 
10 
11 

12 ^ 
13 
14. 
15 



\ 



•I- 



A simplified flo\^ diagram of the interactio|t se** 
quince b^etx^aen thaj^nnat descriptors and the I/O list 



appears iti Flgur© 11 



1* Refer to the f\ow diagram and 



^ trace through the ^OTiiqn sequences for some I/O atate*^ 



'«\ k m^nts."' '^totlce that the bloxsks In the diagram ate mvor 
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0 



Stiart I/O 



11, A ^ 
next element 
from I/O 
list 



^.^ 

12. * next 
field descrip- 
tor from FOR- ,^ 
M/VT 8tat©m©nt*' 



0- 



lA* Terminate process-- 
ing^ of current record 
and initiate processing 
of pew record. 




0* 



y_ 

16. Perform the action 
specified jby the field 
descriptor. 



*Left parentheses and 
commas are ignored as 
field descriptors • 



[1 8. Finished ^ 



21* Scan the FOR- 
MAT statement from 
right to left to 
the first left • 
parenthesis. In- 
clude the repeti- 
tion factor, if 
onci is present. 



Yes 




0 



23 i Perform the 
I/O conversion as 
specified by the 
field descriptor. 



Yes 



22. 
Is $ a 
field descriptor 
of type A, I, D, E, 
F, or.G? 



Figure 11. 1. Flow diagx-atn of the 
int^iraction sequence between the 
fornmt clescriptors and the I/O 
list. 
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No 



24 • Something's wrong! 
You* re not supposed to 
get to her© from there I 



bered, &o you can indicate an action sequence with a 
series Of numbers. Here's an example: 
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WRITE (6, 5) A ! 
FORMAT (IHO.Fi.l) 



The action sequence ia 



10 
11 
12 
13 
15 
16 



12 
13 
15 
17 
19 
22 
23 



11 

12' 

13 

15 

17 

18 



Here's ariother example: 



WRITE(6,6) A,Ii 

FOSMAT CITABLE 5' / (1H0,F5. 1) ) ' 



The action sequence is 



10 


12 


12 


12 


11 


12 


12 


12 


11 


11 


13 


13 


13 


12 


13 


13 


13 


12 


12 


■ 14 


15 


15 


13 


15 


15 


15 


13 


13 




16 


17 


15 


17 


16 


17 


15 


15 






19 


17 


19 




1« 


1? 


16 






22 


19 


20 




22 


18 








23 


20 


21 




23 





Now, you try some* Complete the action sequence 
for each ofM;he following three examples , using the 
flow diagram in Figure Holt 
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1. 





wklTE(6,7) A 


1^ 


7 


FOKMAT (IHO , FS . 1 , 1H%) 


' «5 



2. 



l^ITE(6,8) A 

FORMAT(1HO.F5.1//'OTHAT IS ALL.') 



J 53 
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3. 



RKAD(5,9)A,B.C,D 
FORHAt(2(5X.F5.1),FU.A) 



Correct action sequences are shown below: 



3. 



10 


12 


11 


12 














11 


13 


12 


13 














12 


15 


13 


15 


« 












13. 


17 


15 


17 














15 


19 


16 


18 










* 




16 


22 




















23 












•i 






10 


12 


11 


12 


12 


12 










11 


13 


12 


13 


13 


13 










12 


15 


13 


14 


15 


15 










13 


17 


14 




16 


17 










15 


19 






9 


18 










16 


22 




















23 


















10 


12 


11 


12 


n 


11 


12 


12 


11 


12 


11 


13 


12 


13 


12 


. 12 


13 


13 


12 


1'^ 


12 


15 


13 


15 


13 


13 


15 


15 


' 13 


15 


X3 


17 


15 ■ 


17 


15 


15 


16 


17 


15 


17 


X5 


19 


16 


19 


'17 


17 


«• 


19 


16 


18 


16 


22 




22 


19 


19 




22. 








23 




23 


22 


20 




23 














23 


21 
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NOTE: In this case, the 2(5X,F5.1) in the FOR^IAT wao 
treated simply as 5X,F5. 1 ,5X,F5. 1, thus deleting the 
inner parentheses. 

Array input /output is handled in much the aam way as 
nonarray ln^>ut /output. It la possible to reduc© th& number 
of entries in th©f Input /output list by using "implied DO's"; 
however, this can time conQuming so that ©impH^^^ 
In x^ritlng the I/O statement must be weighed against the 
accompanying Increase in computer execution time. ^ example 
of a list with an implied DO follows. 

READ(5,111)K,L,((A(I,J),I«1,K.2),M(J,3),J-1.L) 
In this example the elements updated by the READ are 

K,L, A(1,1).A(3M),A(5,1), ...» A(k,l)»M(l,3), 
A(1,2),A(3,2),A(5»2>, A(k,2) ,M(2,3) , 

* 

... 

A(1,L),A(3,L),A(5,L), .... A(k,L),M(L,3) 

where k is either K or K-1, whlchevor is odd. Th^ FORMAT 
statement associated with this READ statement must bd such 
that the field descriptors agree with -the data type of 
corresponding variables in the I/O list, 
NOTE: Index variables for implied DO's (I & J in the 
example above) are modified just as index variables of DO 
statements. Consequently the* value appearing in an implied 
DO index variable will be different after the I/O statement 
is esxecuted £rom what it was before the statement was ©xecut- 
ed. ■ 
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QU BSTION t l^at Is an appropriate FORMAT statement for 
the above READ statenient if K, L, M ar© of 
integer type and A Is real type? Assume that 
K«5 and L«3. 



One 4t^rrect FORMAT using arbitrary field widths is 
shown belt>w: 



111 



F0RMAT(2I5/(3F5.1,I6)) 



f 

\ 



In this FORMAT, the values of K apd L ftiust be launched on the 

first data card; and three values of the array A and one value 

of the, array M ar© placed on each of the eulybaquent data cards. 
Refer . to Activity 1, UNIT //II ACTIVITIES TABLE. 

SELF EVALUATION: ' . . 

A. Writ© a program segment that will read in the array punched 
on %\\mB% data cards > using only one READ statement ^and one 
FORMAT statement. (S©e pages 11,16 atid 11.17 for solutions.) 

Ijlllimi3.12|222^2l22223|33333|§333-M4444/»{44A45|55555|^ 

123^5|67896l2345678901234S67890X234567890i;j34567B9(3123456789012345678901234d67890 
20 

0.3| 1.2 "3.6 51. 3| 1, 11-81. 2| 20,01 49.91 -5.6j 21.3j 78.C|-31.3| 30.5|-19.2i 4.7< le.O 
-17.0 18.0 



0.0-20.0 



49.9 ,-5.6| 21^31 78.CI-31.)I 
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Write a program segment that will write out the array 
described in 1 above fiVe elomente per lin* on ©vory other | 
lino (doubl®-apac©d) . 

Write a program segment that will write out the array In 
1 above on®, element per line single-=spac©d In reverse order 
in which they weir© read in. 

.• 

The students in a particular course took an examination on 
which the scores were based on 100 points. Write a Fortran 
program that can handle up to 1000 scores and will count the 
number of students who made scores greater than the average. 
(The average is found by dividing the total of the scores by 
the number of scores.) 

The scores are punched in 16 fields of five columns each 
with dsiclmal points punched. The first data card contains 
only the number of students who took the test, right-justi- 
f led in columns 1-5. Use only one REAP statement in the 
program. 

Use a DATA initialiaation statement for initializing running 
sums and counters* 

The output is to be placed at the top of a new page, must 

li^^® that shown below, and must be produced 
^^t^,22ill £E® Mm statement, 

(Small x's indicate numeric fields.) 

J-57 



11.15 



11111111112222222222333333333344444444445 
1234567890 123456 78^01234.5678901234 '>678901234567890 
AVERAGE SCORE IS xxx.x 

NUMBER OF SCORES ABOVE AVERAGE IS xxkx 
SCORES 

XXX. 
XXX. 

etc. 



ir 



E. Refer to Activity 2, UNIT #11 ACTIVITIES TABLE. 



ASSESSMENT TASK: You will be asked to construct, debug, and document 

a Fortran program. Contact thq instructor when you 
feel ready . 

# 

WHAT NEXT? U haven't completed UNIT //13 (COMSC) , you should 

do ao. You should start UNIT //14 (COMSC) as soon as you 
feel that you have a good grasp of UNITS //ll and 13. You 
may want to try UNIT //12 or 16 (COMSC) concurrently with 
UNIT //14. 

When you have completed UNITS #11 and #13, you may 
elect to stop, in which case you are. i^ot eligible for a 
grade higher than "B." If you wish to try for an "A," 
\ then you must ^pomplete the remaining units. Discuss 
this with your instructor if you wiah. 



r { 
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S61utions to problema: 



J 



A. 



READ(5,1)N.(A(I),I«1.N) 
rORMAT(I2/(X6F5a)) 



B. 



WRITE(6,2)(A(I),I-1,N) 
FOI»iAT(lH0,5F6.1) 



C. 







DO 3 I«1,N 












WRITE(6,5)AfL) 


3 




CONTINUE 


5 




FORMATCIH ,F6.1) 



On some computer systems the following program segment will 
work» but notice that the form of the subscript is nonstandard: 



DO 3 I«1,N 

miTE(6,5)A(N"I+l) 
CONTINUE 
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C K [IS THE COUNTER FOR THE SCORES ABOVE THE AVERAGE. 
C Sm IS THE CUMULATIVE SUM OF THE SCORES. 
C S IS THE AimAY OF SCOIUSS. • 

DIMENSION S(IOOO) " ^ 
DATA SUM,K/0.0,y 
11^ UT SECTION \ 

READ(5,1)N»(S(J)>J-1,N)^ 
FORMAT<I5/(16FS.l)) 
FllND THE AVERAGE. 
DO 2 J«1.N 
SUM«SUM4-S(J) 

CONTINUE ^ 
AVG^SUM/N ^ 
CCjUNT THE SCORES GREATER THAN THE AVERAGE, 
bo 3 J«1»N 

IF(S(J)7AVG)3,3,10 _ 
10 K-'K+I/ 
3 CONTINUE 
C odlPUT SECTION 

WR1TE(6,A)AVG,K, (S(J) ,J«1,N) 



F0R^^AT(18H1AVERAGE SCORE IS ,F5.1/ 

1 35H0NUMBER OF SCORES ABOVE AVERAGE IS 

2 7H0SCORES/(2X,F4.0)) 

CALL EXIT W 
END 



.lA/ 



6 
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UNIT #11 (COMSC) APPENDIX 
F01^<fS 

GENERAL FORM: rmnnn FORMAT • . . .6^) 

where nnnnn is a statement number 

(1 through 4 or 5 digits) 

« 

6^, are field descriptors 

THE FIELD DESCRIPTORS AND DATA TYPES TO WHICH THEY APPLY ARE: 



rAw 


character data fields 


rlw 


integer data fields ^ 


prDw.d 


real data fields 


prEw.d 


real data fields 


prFw.d 


real data fields 


prGw*s 


integer, real, logical or complex data fields 


'literal' 


transmits literal data (output) 


wH 


transmits literal data (output) 


wX 


field skip on input or insert blanks on output 




group. format specification 



where 



d Is an unsigned integer constant specifying the number 
decimal places to the right of tbp decimal point, i.e., 
the fractional portion. ' The d mast be specif :|.ed in D, E, 
and F field descriptors even if It Is zero; Furthermore \ 
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w must be greater than d. For E type format w :> d+7. 
In thiw caeo the field width w must Include In addi- 
tion to d, a position for a sign, a digit, a period, 
an E-, an exponent sign, and a two digit exponent such 
as 

±0. xxxxxxEtee 

is optional and represents a scale factor dealgnator 
of the form nP where n Is an unsigned or negatively 
signed integer constant. 

J 

is optional and is an unsigned integer constant used 
to denote the number of times the format field descrip- 
tor is to be used. If ' r is omitted, the field deacrip- 
tor is used only once. 

Is. an unsigned integer constant specifying the number 
of significant digits. ^ 

is an unsigned nonzero integer constant that specifies 
the width of the field. 



UNIT //1 2 (COMSC) *-v. 

* « 

TITLE: ARITHMETIC CONCEPTS . . . 

* 

RATIONALE: It is safe to say that more' arithmetic Is don© li^'&n 

hour on the Installed computers today than has been 

done by all of mankind since man began to count, Yet^1> 

* 

the type of arithmetic that we study in school satisfies 
quite different properties from the type of arithmetic 
performed by computers. The results of a computer com-- 
putatlon are usually close to^hose of a hand computa-- - 
tion; however, in a specific case in which an author 
reported, "The numerical .integration in this study 
took about one ^ihd one half years with twenty working 
hours every week with a considerable amount of work, and 
endurances/' the resulting hand calculation turned out 
to be totally incorrect! In this unit different types 
of arithmetic computation will be investigated • 

OBJECTIVES: Determine the number of significant digits in an 

expression^ given the number of significant digits 
in each element of the expression* 

Describe integer^ arithmetic > floating point 



X2ol 

... : > 



12.2 



•* arithmetic, and fixed point arithmetic as implte- 

_^ « . m©nt®d on digital computers. 

Describe the associative, co«wiutatlv©» and 
^ distributive laws of arithmetic and t^ieir rela- 
: ; tionships to arithmetic performed on digital com- 

J * puters. / . 

- ■ Describe @rjCiM?/in arithmetic due to rounding^ 

truncation, loss of significant digits, conversion 
iTCom decimal to binary, and conversion from binary 
' to^docimal. 

■ * * 

^^™Q"ISITES: UNITS 11 and 13, Math units on aaaoclative, commuta- 

tlve, and distributive laws of arithmetic. 

- ' . ^ 

ACTIVITIES: - Read the following material and perform the taske 

I 

indicated. Answers ax'e at the end, of the unit. 
• ^ * Accuracy is raeaaured in terms of the number of 

signiflcW digits which a number contains. Any one 
of the digits 1, ,^ 3, 4, 5, 6, 7, 8, 9 is a signlfl«" ' 

^islt. The digit 0 Is sometimes, but not always 
significant. Three cases are possible for the digit 
.0. 

r.. 

Zeros are to the left of all .other" non-zero 
digits. Here the zero is used to indicate ' 
the decimal point and is not elgniflQajftt. 
'For example, in .00123, the leftmost two 

zeros are not significant; rather they serve 

■ : iff^ • • 



«4 



I 
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as position holders for th© decimal point. 

(b) Zeros jblxq between significant digits. In 
this case the zeros are considarad to bfe 
aignlf leant. In the number 1002, the two 

^ zeros are significant , 

fi 

(c) Zeros lie to the "right of non^-zero digits 
of a number as, for ^example, in the number 
123400. The zeros may or may not be signi- 
ficai\t. The recommended notation If the 
digits are not significant la to write the 
number as 

1234 X 10^. 
If the first zero were significant this 
should be written as 

123A0 X 10^ 



The number of significant digits in each o^ the follow- 
Ing numbers is ,four: X234, 1002 » .01234,. 3210 x io\ 
^ 1000 X ID'S. ^ ■ - 

ttow many -significant digits are^in each of the 
following numbers? 




(12.1) 



a. 1.234 

b. , 1.005 
Co 60200 
d*. .000012 
e. .000100 



f. 123400 X 10^ ' 

g. lOQO ^ 10"^ 

h. 0 
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A number la a^id to be correct to ^ significant digits if 



its value is Correct to within one half unit (of the given base) 
in the least significant position. For example, if the number 
1234 is correct to four significant digits, it is understood 
that the number lies between 1233.5 and 1234.5. An alternate 
expression for this is 1234 ± 0.5. If 780 x 10^ is correct to * 
three significant digits. It lies between 77950000 «nd 78050000. 

Frequent ly> numbers which are known to many significant 
digits must be reduced to a "suitable length for computational 
purposes. A process called y^p^ ndlng-, is used to reduce such a 
number to ^ significant digits. On a computer this operation 
is performed by adding (subtracting) one half of the base in 



retaining the resultant ja. significant dibits. The following 
examples illustrate this procedure for base 10 numbers rounded 
to 4 significant digits. 



the ^position (n+1) if the number is 



positive (negative) and then 



1 2 
+ 00 



3 4 5 6 
0 0 5 




12.35 correct to faur significant 
digits 




. 9 8 7 6 4 
. 0 0 0 0 5 



, 9 8 7T[9 



.9876 correct to four significant 
digits 



i 
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I 2 
0 0 



3 4 5 6 
0 0 5 



- 1 2 . 3 5 0 6 



•12.35 correct to four signif- 
icant digits 



' . 9 8 7 6 4 

- ^ JU) 0 0 5 

- 9 8~yTT9 



-.9876 correct to four signif- 
icant digits 



This procedure produces slightly different distribution 

of results relative to the manual procedure of rounding, 

The manual procedure does not round if the digit in the 

nth significant position is even and the digit in the 

position (n+l) is a 5. • 

Ejfamples .of the manual procedure are 

12.345 12.34 correct to four significant 

( digits 

12.355 E 12.36 correct to four significant 

digits 

Round by both the manual and computer based methods 
each of the following numbers to 5 significant digits. 



(12,2) a. 3,1415926 

b. 2.71828 

c. 4679.25 

d. 4679.35 
e» -4679.25 
f. -4679,35 



manual 



computer based 
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To datermin© the numb^^r ut yigniflcant digits reaultiug 
from the evaluation bf an arithmetic expression, given t;he num^ 
ber of significant digit© in each element of the expression, It 
is necessary to establish some rules governing significant digit 
arithmetic • These are given under the headings addition, aub« 
traction, multiplication, and division below^ 

Addition , When adding two positive or two negative 
numbers, there is no loe^ of significance 
when unrounded operands are used. In some 
^ cases the result may have one more sigkifi-- 
cant digit than either of the operahds. 
For example, suppose 15,36 • 2 and 7428*9 
were rounded to 1536 and 7429 respective- 
ly* The additions of the rounded and un- 
rounded numbers are 

rounded unrounded 

4536 4536.2 
_7429 7428.9 
;L . 11965 - 11965.1 

both of which are correct to 5 signl- 
f leant digits ♦ Tlie following case 
illustrates a loss of significance 

6 

when rounded operands are used; 



2^ 



S 



12 

/ 

roundiad unrounded 

» 

1232 1231.5 
6746 6745.5 
7978 4t 7977.0 

since the result is correct to.threa significant 
digits instead of four significant digits -sdiich 
each operand contained. \ 

\ 

How frequently is such a loss likely to occur? 



When one of thfe operands contains fewer signif- 
icant digits than the other, the operand with the 
greater number of places to the right of the decimal 
must be rounded to conform to the other operand. 

Fpr example » In order to add the two numbers 
and 2345.6, it Is meaningless to t'etaln more 
than on© digit to the 'right of the deciuaal point 
because th© second number is accurate only one place 
to the right of th© decimal point.. The sum is gjl^ven 
by . . * . "* 

12.3 \ 
2345.6 
2357,9 



J 



/ 

/ 



Subtraction > l^niien a subtraction occur)^ (by either 

adding a positive number tcT^ negative number 
or by subtracting a positive number from a 
■ s positive numbeif), a complete loss of signifi- 
cance ^nay occur. Usually each case must be 
eonsiderad Indepi^dently. As an ei^ample 
consider the numBers 12345.6 and 12345.4 
which are rounded to 12346 and 12345. The 
results of , rounded and unrounded subtraction 



are 



rounded unrounded 

12346 12345.6 
• 12345 - 12345.4 



Although the two are rounded correctly to 
5 significant digits, the result has no 
significant -digits. I.e., the 1 is off by 
a full unit. It l8 more likely that a loss 
of significance occurs, but not a complete 
loss of significance. Xh6 best strategy 
Is to try to arrange the computation so 
that subtractions do not occur. As discuss- 
ed earlier in UNIT #11 (COMSC), otte real 
root of the quadratic equation should be 
constructed as 



12» 



^ 2a 



if -b 4.8 positive 



or as 



V. w ""b — \/b ^ — 4 • a 'C J r 1- J 

~ ■ " if -b is negative. 



Tho other root is determined by recognizing that 



XjXj w c/a 



and hence 



Thus there is no subtraction in determining the 
root. If both a and c are positive » a loaa of 
significance definitely will occur in the compu- 
tation of the discriminant. This loss may be 
reduced if b^ - 4ac is computed to as high a 
number of significant digits as possible. This 
is called double or multiple precision and will 
be discussed subsequently. Double precision is 
another strategy for reducing the loss of signif- 
icance. • 



ERIC 



1 . 



Multipli cation^ Up to two sTgnif leant dtgltB may be lost 

' ■ ' » y^jn ' u » ' «' j ■ ec< » - » < i. i'i n^ i ■ B.^ g a ^ joaam * % 

in a multiplication^ The product of 
921% 2 and 102,4 each roundad to three 
aignificant digits compared with the un~ 
rounded numbers provides an ©xarople. 

rounded ^ unrounded 

921 , • 921.2 

102 102. A 



1842 36848 . 

9210 18414 
9^^ ^ 92120 

94329.88 

Although the multiplier and multiplicand 

are' correct to three significant; digits, 

^ * / 

the product differs by 6 in the; third 

(' 

position from the left or by 0|6 in the 
second position from the left.^ That ia, 
there is only one signif icant^digit in 
<th© product, even though both the multi- 
plier and multiplicand were correct to 

* three significant digits. 

Division. Up to two significant digits may be lost in 
a division. Consider the quotient .of 1763.4 

• by 1761.6 with both dividend and divisor 
rounded to four significant digits each. 
How many digits are significant in the 
rounded quotient? 
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How many significant digits result if each 
operand in the expression 



R - (A-Ijfe»-C)'^D*E 



is rounded to 3 significant digits if 



A « 1^32. 7 

! 

B « 432.4 

1 

C - 341.62 



D 123.4 
E « 987.6 



r 



\oundad 



" unrounded 



number o£ significant digits 



173 
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Integer arithmetic aa implemented on digital computers 
assumes that the radix {decimal > binary > octal, hexadecimal, 
etc) point is on the right of a fixed size number » The fix-- 
ed number ia called a Word and might be 10 decimal digits or 
32 binary digits or 36 binary digits or some other Qisf;e, 
Addition and subtraction are performied ualng -one word* Multi^ 
plication and division require two words, but are subsequently 
reduced to one word. Consider a decimal^machlne in which a 
word consists of two digits. 





7 


0 




• 






2 


3 








X 


4 


7 














1 


0 


8 


1 




0 


1 


6 


9 





The sum or difference is 
generated in one word. 



Ttie product requires two 
words . 



1 


4 


0 


1 



/ remainder 
quotient 



I? 4 



4 



The dividend 
requires two 
words, the 
divisor re*- 
quires one 
word , Tlie 
quotient is 
in the left-- 
most word , 
the remainder 
is in the 
rightmost word 
after division. 
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rhe roault after division Is not rounded. Tlie remainder occurs 
In one of .the word^ and requires special manipulation If it is to be 
utilized further in the representation of the quotient. Instruct iona 
on the computer make it easy to solect the rightmost x^ord or the left- 
most word of such a pair of words. 

In floating point arithmetic, part of the word refers to the 
exponent (or power of the base) and the rest gf the word consists 
of significant digits. Suppose our computer has 4-digit de9imal 
words with a plus or minus sign. Suppose floating point numbers 
have the Perm 



— 


e 




.^2 






where e stands for the exponent and the numbers in d., d,, and d 
make up the mantissa or the actual digits of the number. Exponents 
may range between 0 and 9 in a one digit field. If the number 5 is ' 
u^ed to represent an exponent of 0, a one digit field can be used to 
represent exponents between ~5 and 4. Such a representation is 
termed an 'etxcess 5' representation. It allows positive numbers 
to represent negative exponents. ITie location of the decimal point 
relative to the digits ddd (the subscript has been dropped temporarily) 
is gi/en by the following table. ^ 



9 
8 
7 
6 
5 

3 
2 

1 

0. 



exponei^t 


decimal point 




dddO. 


.3 


ddd. 


2 


dd.d 


1 


d.dd 


0 


.ddd 


"1 


.Oddd 


-2 


.OOddd 


"3, 


.OOOddd 


-4 


.OOOOddd 


-5 


.OOOOOddd 
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We require that after all floating point coBiputatlons 
d is non-zero, unless e, d , d , d„ are all zero. 

The exponent o is a poW of 10^ To multiply 
two numbers, one multiplies the mantissas, and sub-- 

tracta 5 frqm the' sum of th^ two exponants, perhaps 

« 

making -a correction to force of the rfesult to he 
non-zero. For example, the computation of 3 x'2 in 
this floating point format is carried out as 



2_' 



6 


3 




0 



/ 


e *® 


646-5- 


6 











/ 


0 


.6 


0 



6 


6 


0 


0 



In this example, is zero; consequently, an automatic 
left shift of 1 occurs. " A left shift of 1 is equiva- 
lent to multiplying by 10; thua , the. exponent must be 
reduced by 1 to retain the proper vaAe. 

The computation of 8 x 7 does not\require a flxup 
shift to place a non-zero digit into the d^ -position. 



1 ^ 


8 


0 


0 


X 


6 


7 


0 ' 


0 




7 


5 


6 


b 



Since two three digit operands can generate a six 
digit product, either two or three of the six digits are 
lost in a single precision multiply. No rounding occurs, 
In a double preqislon multiply, all six digits would be 
retained. 



Write each of the following numbers as a floating 
point number in the format just' described. 



^•67 _ d. -36.2 



000987 .02 

^^^000 ____________ f. '-.0000763 



Indicate what the results would be in single precision 
floating point format for 



4.67 X (-36.2) 
L04000 X (-.0000763) 
-36.2 + 4.67 
.02 + .000987 
1040.00 + .02 
000987 X (-.0000763) 



On the 3.60/65, floating point arithmetic is used for 
arithmetic of type REAL. Two formats exist, single 
precision and double precision. A single precision 

< 

floating point number is 32 bits in length and con- 
sists of a sign bit, 7 bits for tlie exponent » and 24' 
bite for the fraction. 



7 31 



fraction 




0 1 8 
Sirngle precision floating ppint representation 



/ f 
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The fraction Is In binary ^the exponent represents 
powers of 16. A bias of 64^^ servee the game pur-. 
po^e iiB the bias of 5 in the discussions above. 
"Excess 64" igj another designation for the biaa of 
64. The binary representation of 64 is 



1000060. 



64 



10 



40 



IG 




An exponent of 65io 



1000001: 



65i 



41 



1 6 



Indicates that the fractional part is to be multipll^id 
by 16^, An -exponent of 62 indicates, that the fractional 
part is to be- multiplied by 16'\ etc. Double precision 
floating point numbers on the 360/65 use two words with 
tile, fraction part being 56 bits in length. 



V 



7 



JL 



63 



0 1 ^8 32 « , ^ 

Double precision floating point r^resentation - 
Although 1^ is not difficult," we shall forego calculating 
in floating point arithmetic for the 360, 
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In niatheraatics a great deal of time is spent 
dlscus5?ing associative, commutative/ and distributive 
proper tiea of arithmetic. To remind you of these 
properties Ve list them below. 

Associative property (grouping property) 

Addition ^ (a+b)+c ^ a+(b4x:) 

- • 

. Multiplication (a b)'C « a-(b-c) 

Commutative property (ordering property) 
Addition ^a+b « b+a 

Multiplici\|:ion a-b « b^a " 

Distributive property * 
(dH-b)-c ^ a^c -f b*c 
a- (b-^) » a-b -f a- c 

.On a digiCal computer J the commutative property 
holds (any truncation that« occurs will occur independent 
of the order of the operands); however, the associative 
and* distributive properties need not hold. The thre<^ 
digit ^floating point irepresentation used earlier . illus- 

. ' r 

trates this^ welll . . . , 



e 



Single^ pre6±aion floating point format ^ 
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If the values a, b» and c were 



then 



a « 5670. 
b « -5670, 
c .000987 

V 

(a+b)+c .000987 



9 8 7 



] 



and 



a-f(b+c) 000 



0 



0 0 0 I 



Thus 



(a-fb)+c a+(b+c). 



Determine numbers a, b, and c for which 



(a-fb)- c ^ a-c \ b*c 



if the arithmetic ia done*Trtt"our digit floating 
point representiiition. 



(12.8) a. a ^ 
b. b ^ 



d. (a+b)« c » 
a-c + b-c 



Is I) 
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Determine -numbera a, b, and c for which 
a - (b-c) ?^ (a.b) • c 

a. « " ^ d. a-(b.c) " 

b. b " (a-b)-c » J 

c. c =■ 

if the arithmetic is done in the 3 digit floating point 
representation. 

NOTE: 99.999% OK THE ARITHMETIC DONE TODAY DOES 

NOT SATISFY THE ASSOCIATIVE OR DISTRIBUTIVE 
PROi'ERTIES. 

it should be obvious from these examples that the order 
of operands may produce some error in a computation. 

Before you get the idea that things are really 
bad, the computers are almost associative (aa) and 
almost distributive (ad) enough so that reasonable 
results occur. . It is unlikely that computers ever 
will be associative or distributive. (Wliy?) Conse- 
qi^iently, in order to establish a degree of harmony with 
mathematics an aa~ad system must be defined matliematfc/lly . 
Whs^ knows, you just mlfehc get/involved- in -such a project, , 



Minor numerical discrepancies may take place 
during input/output • Numbers repreaerited in base 
10 must be convertdJd to binary beforiv computation© 
occur and results inuet be converted from binary to 
decimal for printing. Exact fractional represen- 
tations in decimal do not necessarily have exact 
fractional representations in binary; consequently, 
an error occurs when a converted value is trury::ated 
to the word size of the machine. For example, 



(.1) (.OOOIOOOIOOQIOOOIOOOIOOOI ) 



That is, 1/10 does not have a terminating binary 

fraction expansion and hence has to be truncated to 

.the number of bits in a word. The fraction 1/2, on 

the other hand, has an exact binary representatlonr, 

« 

namely, t. The fraction 1/3 has both a non-ter- 

minatlng decimal expansion and a non-terminating 
binary expansion* Errors ^^Khich occur because of the 
requirement for different bases are usually not 
significant. Infrequently special programming may. 
be required to avoid a truncatioh problem in the 
conversion from one base to another - but only in- 
frequently. 
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Conclvision* In the pfeced^lng dlscuoulon wo have avoided actual 
details how various computara handle arithmetic operation®. 
^Computer;^ mav differ markedly: in this regard. The aamo program 
run on dtffei^nt computers may poeylbly produce slightly different- 
numeric resultH^ , Especial ly If several slgnlfjLcant figjures are 
Vequlrjdd , lu the reBults. ' ^ ^ 

The.QHerci'ses in thfs unit are Intended to demonstrate to you 
that- numbers are not neceBsarily what they appear to be and that 
whether iiumbets are or. are not rounded before calculations generally 
affects resulla. . ' • 

Cenerjiily computers .do not round results of ar ithmetlc ^opera- 
tlons, but rather truncate the results to the specified nuniber of 
dlglta that -the corajputer Is designed to handle. An 'example of how 
thlH- might affect results Is four^d In a calculation t^fat Involves 

several division s(;ep6. In which the Vemainder Is 'lost each time. 
■ • 

Vi\e absolute value pf the final result will be expected -t;o- be 
smaller than if rounding based on the magnltyde of ' the remainder 
could have been performed. Kor example » suppose we wanted to 
evaluate 

23.3 , 36.5 . 4^ . eU42 
3 ■ 2.6 3.7 

to three afgnificant digits with truncation of digits beyond three. - 
The result ds- . . 

■ s ■ 

^ 8;43 + 5.21 + 1.54 + -2,27 17.45 ->• 17.4 . 
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Rounding g^lvftB » < 

■8,A3 4i 5.21 + i.54 + 2.28 « i7.46 + 17.5. , 
If the frac-tiorfs containing the remaindera are inqluded, then the 
result la ' 

♦ 

. • 17.47 * 17/5. • ' ■ " 

You can sua that th^ ^rror accumvilatee a0 .raor^^' operations? are 
performed. ^ 

What conclusions can we draw? 'Hiere are many possible; here ' 
at^ a few: 

"a. In general, you) should organize calculations in a program 
so tlvat the rtiuftbar of (arithmetic operations that are per- 
t o);-nied is ininlmiiKed . ' • • 

b. Avoid situations in s program in which X.\io .quanfett'ieg of 
Similar magnitude are subtracted, resulting :i« ifae of 
significant digits% \ 

c. In general, you should arrange- oj^eratioQs 'thit are "jespeclally 
prone to loss of significant dlglta (subtraction and division/ 
so that they occur last or near the end of a series of cal- 
culatlons* ' * . 

d. Be sure that results given by the co*raputer are reasonablet' " 
Check them by hand, if possible, with several sets of trial 
data. . Additional care; is also required becausa a program \ 
will not necessarily produce correct results with all data 
Just because, it does for some data. 
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SELF ASSKSSMENT: I£ you have worked through the examples in the 

material, thon you should have asaeased your 
progress ai*"eady. Chock your anavers with those 
. given on the next page, 

ASSESSMENT TASK; Pioase see your instructor. You will be required 

to apply the rules on rounding, the type^ of 
arithmetic, etc., las specified in the objectives, 

WHAT NEXT? You should complete UNITS 14 and 16 before yoM can begin' 
UNIT 17. 



• r ? Or 



Solutions to problems in UNIT //12: 
<12.l) a. 4 f. 6 '~\ 

b. 4 8« ^ - 

c; 5 h. 1 

d. 2 * 

e. 3 



(12.2) manual / computer based 

a. 3.1416 3.1416 

b. 2.7183 2.7183 

c. 4679.2 4679.3 



f d. 



4679.4 4679.4 
. e. -4679.2 ) -4679.3 

f. -4679.4 -4679.4 



(12.3) The dtglt in the position involved in the bounding iilust 
contain 5 for each operand. Asauming that the digits 0 
to 9 are equa^lly likely^ candidates for this digit posi- 
tion, th&re is 1 chance in 10 for each operand or 1 chajxt!e 
In 100 that such a loss will occur. 



(12.4) 3 



<^2-3) R,,,„,,, - 41682732 " 41669735.6928 
number of significant digits *t 2 



(12.6) a; .4|;467 d. «-7362 

- b. ^*2M7^"^^-^ " e,' +4200 

c» cannot b@ represented ft **1763 
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(12.,?) a. -8169 

b. cannot b© repreH&nted 

c. -7315 

d. +4210 

e. +9104 

f. cannot be . represented 



(12.8) a. 1000 r 



' b. -999. 



c. 10. 



d. 10 



e. cannot be represented since 



a'C is to6 large 



(12.9) a. 100. 



b. 100. 



c. ,01 



d. 100 • (1) - 100 

e. cannot be represented since 
a-b is too large " 
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UNIT m (CPMSC) 
TITLE: SUBPROGRAMS 

. •• , 

RATIONAL^: Hie writing and debugging of long programs may 
become quite frustrating. But, if the programs 
can be divided into shorter, simpler parts, then 
both the writing and debugging can be simplified. 
By using subprogram§» in Fortran, you divide 
programs into shorter and simpler segments write 
them, and debug them quite easily. This capability 
alone provides an Important rationale for learning 
to use subprograms. 

Another useful feature of subprograms is that 
they may be saved for future use with other programs. 
A subprogram is an independent unit which can be 
placed •Ufith any other ^ program (or subprograiti) and can 
be used with that, program,^ provid.ed it is properly 
called. This obviates your having fo write more than 
one time a program that handles a particular type of 
task. 

Subprograms are a very powerful part of 5'ortran 

, . ■> 

and are used widely. Certainly your skills in the use 
of FortVtan would be incomplete wltliout an ability to . 
write and\se subprograms. . 

'v ■ 

V 

! 
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OBJECTIVE: At the end of this unit you will bo able to construct 
any . type of subprogram and its coiq;re8pondlng calling 
statement and to construct « a program using any type 
of subprogram. 

PREREQUISITES: UNIT //iO (COMSC) . 

SUBOIkJECTlVE I: Identify the four elements of the concept of 

Hubprograms . 

ACTIVITIES: 

f 

A. Here are six numbers: 2.5, 8.1, -5.2, 0.0, 4.3, 

Find the average of these numbers and 

write it in this blank: - In order 

to work the problem you had to aside to the 
margin or to scratch paper for a work area. You> 
in effect, transferred the numbers to this Vork 
area J, performed the calculations that were re- 
quired, and then transferred the answer back to 
^ the blank -line where you were told to place the 

» answer. What you just did is analogous to what 
happens when a subprog'r^m is used in Fortrj^in, 
\ Let^s Ixivestigate further what you did. 

\ 

In the problem given to you above, "Here 
are six numbers*. Find the average ... the 

■ v« 

,key word is average. This word tells you which 
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-=-eu^'Hi-»»_*M-t,i9Wm'.!Ji*. 
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procedure Lo pull from the stored Information 
in your rrttnd. lit othei: words, the word aver ago 
elicits the procedure that says to add the nuTQ- 
bers together and divide by the number of items. 
Hie procedure hao a name. Fortran subprogramH 
also have names . In order to use a subprogram, 
you must refer to it by its name in a CallinR 
sta tement , about which you wili learn more short- 
ly. \ 

The name averag^e tells you wha\ computational 
proceduife to follow, but you .cannot find the aver- 
age of some numbers unless ypu have those numbers. 
So t^ second thing you did was to transfer the 
numbers whose average you were to find to a worJt.* 
area. ^Similarly, a Fortran calling statement ©ends 
the data items specif ied in. the calling statement 
to the subprogram (analogous to the work area) . 
The items sent are called arguments . 

Once the nupibers were li^ the work area , then 
you could actually execute the "average" procedure 
and find the averaged In' the same vay, a Fortran' 
5i!kPJS£g£iS Qxecut€sd > perforraing whatever t&sk 
It Is programed to do, 

. ^ Finally, when you had calculated the average* 



I9n 
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tn tiif work area, then you tranef erred the result 

to the place where yoxi were Instructed to put It. 
»\ 

Then ybu proceeded through the material. Similar- ^ 

f 

ly, a Fortran subprogram sends the result (or ^ 

results) the main tirbgratii and N^tume control 
• to the main program, which allows' the comput^er to 

proceed through Yhfe rest of the program. 

Let's review, the four elem^^nts o^ the concept* 

of subprograms and the corresponding elements of - 
.solving the problem to find the average of six 

numbers , " , 



Average 'Problem 



Fortran Subprograms 



The name "average" tells the 
student which of his mental 
procedures to use* Invoking 
the name calls for the pro-^ 
cedure. 

Tl-ie student transfers the six 
numbers to the' work area 
(scratch paper or margin) so 
that i\e will have numbers for 
calculating. 

The actual calculation of ^ 
the average *i8 performed. J.<;^, 

The resulifrs of th'e calcu- ' 
lation are transferred 
back to the blank line on 
the page. 



1. The name of the subpro- 
gram tells the computer 
which subprogram to use . 
Invoking the name calls 
the subprogram. 

2. The -data to bemused in 
ttie subprogram are ^ent 
to the subprogram through 
the argument list. 



3. The instructions in the 
^subprogram are executed. 

A. The results of the aubpro 

gram that has been exe^ 

cuted are returned to 
. the main program. 
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- B. Refer to UNIT i5>13- ACTIVITIES TABLE, Activity 1. 
SELF EVALUATION? 



A. Identify ^'the four eloments of the concept of uubpro-- 
, grams In the following analogy. 

. . ^ . _ . . ,^ . ^. 

A student is working a problem and comes to a 

step In which he must take the square root of a num-* 
ber. Ite refers to a square root table in a mathemat- 
ical handbook^ writes the sijuar© root, of the nurab^ 
op the paper ^ and proceed© with the problem. 

li» The^ Fortran compiler has a "built-in" subprogram for 
"^s^c^gilcuiatlng the square root; the "name of the subpro-- 
gram'i:© S()RT. Suppose that the statement Y«SQRT(X) 
occurs in\^^^^or^t^^ Identify. the four ele- 

ments o-t the -^^<^[^cep.t of aubprograms when thajt state- 
ment l9 executed. \ . ' 

^IPBOBJECrfVE XI; Constpruct single etatement functions and call- 
ing statements fox* thain; construct cothpilte a 



pcogrijira using 'them. « / 

"'ACTIVITIES; . " • ■ * • 

C. Uefer to UNIT //13 ACTIVITIES TABLE, Activity 2% 

P^^ The quadratic formula fdr finding the roots of 



quadratic equation of the form 



ax + bx ,+ c « 0 



Is 



r « 



2si 



A aimple program for finding the roots, of a 
quadratic equatio'n la sho\\mi' below; th6 pr>ogram 
assumes that b^" ~ >Aac '^ 0; that is, that "the 
equation has two real roota. 



\REAp(5,l)A.B,C 
FORMAT (3F1 0.1) 

R06Tiy(-B+SQRT(BAjJ-4 .dfA*C) ) / (2 . 0*A) 
R00'r2|^(~B-SQRT (BAB-A . 0»A*C) ) A(2>^0*A) '' 
WR IT}? (A , 2 ) A , B , C , ROOTl » R(>0T2 
FORMAT ^iH0,5Fl0. 2). 

.STOP .\\ ' ' ■ ' 



END ' 
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This program can bV^^^provedJ "however , in the 
accuracy of the calculation.^ I^T^^-IT '//12 (COMSC) yon^ 
leatn aowething about the loss of significant digits 
Jn arithmetic operations. An exampl© given in UNIT #11*^ 
illustrating this condition is found in the quadratic 
formula; If it turns out that the absolute value b 
and the -quantity " Aac • are of nearly equal magni- 



tude smd tjae two are subtracted, signlflcaat. digits 

■s 

may be lost. In order to prevesft the occurrence of 
this possibility, we can find the roots using a 
slightly different approach. 
Use 

— when ~b>0 



r 

1 



2a 



Vand use 



-h-Vh^ - 4ac 



2a 



when "b<0, 



The second root can b© found from 



r « » 

2 



ar , 



since it is /true that 



r r 

12 



a 



(Try it^ if you tJon't believe iti) 

The program can be rewritten as^ follows: 



1 

XO 

11 
12 



REA»<5,1)A.»,C 
FORMAT(3F10,1) 

IF( -6)10,11,11 ' / ■ 

ROQIl** (-B-SQRT (B*B-4 . 0*A*C) ) / (2 . 0>*A) 
GO TO 12 . 

ROOTl"" (-B-f SQRT<B'«B-4 . 0*A*C) )/ (2 . 0*A) 

R0OT2-C/(A*R00Tl) 

WRITE (6; 2 ) Ai B , C , ROOTl , R00T2 

PORMAT(1HO,5F10,2) 

CAUL EXIT 

END • ,. 
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NOtWl^In the arithmetic IF statement, triinsfer can 
b« ©Ithtsr to statemi^nt number 10 or to statement i^um- 
bQr 11 whmi Is zero* The results are the same . 

r 

either way. 

Construct tlu^ee single statement functions for 
finding the roots of a quadratic equation, (These 
will b© for statements 10, 11, and 12 of the previous 
program.) 



There are many ways to construct the functlblsjs 

correctly. One set ""of Correct functions is shown 

below: . • • 

. RiiJEG(A»B,C)»(-B-SQRT(B>*>B-4.0*AAC))/(2,0AA) 
RIPOS (A»B ,C)« <"B+SQRT(B*3'-4 . 0'^A^C) ) / (2 . 0*A) 
R2(X,^,R)^Z/(X>^R) ! ■ 

(Notice that th© names chosen for thevf unctions 

must be xuai in this &ase, since the results are; 



A- 



returned to the calling statements as the names 
of the subprogram©, R©al namos return real resultii 
Integer names retur^ integer results.) 

Now construct three calling statements for the 
function© you have written • 



/ 



Again there are many possible correct calling 
statements. For the statements above, the calling 

« 

statements cQuld b© 

ROOn«RlNEG(A»B,C) 
. ROOn»S»RlPOS(A,B,C) 
RD0T2««R2(A,C,R00T1-) 



Xh© function 'names must match exactly; the arguments 
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^in the corresponding callj.ng anxl function atateraents 
must match in number (three in this case) , type (real 
to r©al and integer to integer), and order (first 
argument in calling statement to flr^t argument in, 
function statement > second to second, etcO^ 



SELF EVALUATION: 



V 



C. Reconstruct the entire program that finds the roots 
of a quadratic equation, making use of the functions 
that you have constructed. 



r 



X 0 V 
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■fhere are many ways to construct the. program 

« 

correctly. One -aolution is shown b©low. 



1 

10 

11 
12 



RINEG (A>JB ,C)« (~B-SQRT (BAB)-4 . 0*A*Qn / (2 . 0*A) 
RIPOS (A, B , C)« (--B+SQRT (B*B)-4 . 0AA*C) V (2 . 0*A) 

R2(x,z.R)_-.zya*R) . 

.REAI>(5,1)A,B,C 
FORMAT (3F10.1) 

IF(-B)10,ll,n ^ 
R00T1-PNEG(A»B»C) 
GO TO 12 

R00T1«R1P0S(A,B,C) 
R00T2-R2(A,C,R00T1) * 
WRITE (6 , 2 ) A , )3 , C , RQOTl , R00T2 
FORMAT(1HO»5F10,2) 
CALL EXIT , « 

END 



Notice that the arguments in tM function statetoents 
are dummy arguments and need not' be «amod tlie s^me 
as they are in the calling statement. valid " 

names- of the «prop6r types' may be. used as arguments ■ 
in th© func'^ion statement — provided that the same 
names a^e used on the right side of the «, of course. 

» 

{ i 

D. Identify th© fouf element^. of the concept of subpro- 
grams for tii& program you have written. 



SUBOBJECTIVE III: Construat a FUNCTION subprogram calling 

statementa; construct a waiji' program that calls 
• the subprogram. 
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ACTIVITIES: 



F. Refer to UNIT //13 ACTIVITIES 



I 

^ABLE, 



Activity 3. 



G. Below is a simple program f6r finding^ the maximum 
element in an array of real numberB. 



11 
'lO 



DIMENSION T(31) 

READ(5,I)N,(T)[J),J«1,N) 

FORMAT(I3/'(10F8.1)) 

HIGH«T(]/ 

DO 10 J«1,N 

IF(HIGH-T(J)) 11 ,10,10 

HIGH«T(J) 

CONTINUE 

WRITE (6, 2) HIGH 

FORMAT (1H0;F5. 2) 

STOP 

END 



Take the algorithm for finding the maximum and 
construct a FUNCTION subprogram that will find ' 
the maximum » 



r 
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• One correct. way to construct the Buhprogram Is 



shown below* 



11 

10 



FUNCTION HrGH(T,N) 

dimension t(31) 
h;gh»t(i) 

HQ 10 J«I ,.N 

IF(HIGH-T(J))11,10,10 

HIGH"T(J) 

CONTINUE 

RETURN ': 

END 



Notice that, the namgjs-of the subprogram is ^eal, 
since we have an ar*"ay of real numbers and will 
want a real number returned to the main program* 
Notice also that the name of the sjubprojjram 
.appears (aijd inusi^ap|3ear) at least ,once to the 
left of this is done so that the result obtain- 
ed by the subprogram (th^ maximum elsament in this 

case) can bo transferred back to th^i main program 

) 

V 

as the name of the subprogram in the calling state- 



mjent^ 

It is also correct and actually preferable 7- 
to write the DIMEJISION statement DIMENSION T<N) 

♦ 

^ (except on the IBM 1130) « More will be said of this 

\ ' * 

later* \^ , 



H. Now construct a cabling statement that could be used^ 



A 

200 
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for calllag the subpro^Jip^lnt. Any correct calling 
st'atement will do. 



Several examples of correc^t calling vstatements 
are shown b^lox^?. 



BIG«HIGH,(T,N) 

^IG«ABS (HIGH (T ,N ) )+5 . 0 

Y«HIGH(T,10) 

B«HIGH(T,J-1) 



Now consti'uct a main program from the simple prograip 
given earl'ier that will call the subprogram that you 
wrote. 



One »correct way to construct the main program Is shown 



below. 



PROGRAM 
DIMENSION A(31) 
RBAD(5,1)N<(A(J).J"1,N) 
FORMAT(I3/(10F8.1)) 
BIG-HIGH<A,U) V 
WRITE(6,2)BIG 
FORMAT (1H0,F5. 2) 
STOP 

end' 




#13 ACTIVITIES TABLE*, Activity 4. 

[0Bj\.CTIVE IV: ConsVruct a SUBROUTINE subprogram and CALL 
stat^ents; construct ,ja main program that 



calls \the subprogram. 



ACTIVITIES: 



//IS ACTIVITIES TABLE, Activity, 5. 



K. C!bnstru,ct V Sl\BROUTINE subprogram that will find 

t 

thk maximum \elAmenj: of an array ^ (Tlfou may use 



hm used in the previoug^ section. ) 
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One correct way to construct a SUBROUTINE 
subprogram to find the maximum element of an 
array is shown below. 



11 
10 



SIJbROUTINE HIGp(T,N,BIG> 
DIMENSION T(31) 
BIG«T(1) 
DO 1 J=-1,N 

IF(BIG-T(J))11,10,10 

BIG-T(J) 

CONTINUE 

RETURN 

END 



Construct a CALL statement that may be used to call the 
SUBROUTINE subprogram. . • ^ 



Some examples of correct CALL- statements are given 
below. 



CALL HIGH(T,N,BIG) 
CALL HIGH(A,M,X) 
CALL HIGH (A, 15, X) 



Write a main program that will read an array of N elements 
from data cards, will call a. SUBROUTINE subprogram to find 
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the largest element in the array, and will write Che 
largest element. 



\ - 



One solution to th6r problem foXlovsj 



DIMENSION A(31) 

READ(5>1)N,(A(J),J»1,N) 

FORMAT(I3/(10F8.1)) 

CALL HIGH (A, N, BIG) ' 

WROT(6,2)BIG 

FORMAT(1HO,F10.2) 

STOP 

END ■ ■; 



/ 
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NOTE: Tli^ DIMENSION^ etatement l,n the subprogram c&uld 

be»— . in gener^il. should writpen DIMiaJSJON T(N>» 

. ' . - ■ * » , 

excQpt 6n the- IBM U30. You will leaini more about 

. r * -t ' ' . ■ • : 

» , . • .-this in the 'next actJ^vity. 

- ^ • N. Refer to UNIT #13 ACTIVITIES IfABLE, Activity J^.'. 

SELF EVALUATION : . ' ; - 

' ■ F, ilefer oto- UNIT #1,3 ACTIVITIES TA9LE» Activity 7. • f • 

... 

V • 

ASSESSMENT TASK: Please see your instructor. You will be giwfin "a 

problem for which you are to construct a proigram 
and run it on a computer. Then you will be re-* 
* quired to construct some short? prograttis or pro-- 

^gram segments that make use of the various kinds 

C ' ^ . . ' ; • 

of subprograms. ^ » < 



WHAT NEXT? If you haven't completed UNIT //ll, you 8h6uld do ao.^ 
Youishould- start UI^^IT #14 as soon as you feel that yo,u 
have a goo^" -grasp of tTNlTS //ll and //13. You may want 
" • . to try UNit #12 or #16 concurrently with UNIT #l4. 

When ypu have completed UNITS #11 and #13, you, 
^ may elect stop, in which, case you are not eligible 

for a grade higher than "B." ^^^^ "^^^ 
ah "A," then yoti must complete the remaJLning units. 
Discuss this with your InstruGtor if you wish. 
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TITLE: DEBlJG(;iNG 



UNIT (COMSC) 



RATIONALE: " If yoli haven't discovered, by now that It la 

either you are an exceptional programmer or 
you hav^'t been doing the programs* <Which 
do you think is the more likely?). People 
Involved in ge^ratlng computer programs 
•usually admit to making programming errors. 

• ■ 

They also have developed debugging techniques 
which help them to keep the errors to^ mini- 
mum. In this unit you will be exposed to 
methods that others have found useful. You 
will alse have an opportunity to help those 
behind you in the Fortran progtaroraing hler- 
archy with, their programming and debugging 
problems. You should strive to prevent pro- 
gramming ei^rors, but you also, should be able 
-to correct errors oncer they occur, 

* 

OBJECTIVES: To^^revent programming and logical errors. 

To diagnose and correct errors, if they do 

« i 



l4ol9 



OG 



occur/^ . * ^ 
PREREQUISITES: UNITS #11 and 13 '{COMsb). . 



At this point you should carry out the activities In^ the 



UNI^r #14 (COMSC) ACTIVITIES TABLE* 

Now you ar® on your way to becomi 



mE or 



/ ■ 



MASTER BUG EKADIGATOR 




Several levels of debugging exist. Soihe a/e easlc/r to ' 
use than others; some are used under one syateiji, but Jot 
another} and so on. What one looks for is an /of f ective method 
for the particular system that is to be usedJ 

Here are^ some general suggestions that Vou should use for 

^ f 

preventing errors when you are cofietructlng^ j[>rogram8 so that 
debugging will be simplified: 



1. Plan your program carefully, is % 



le logic correct? 



Draw a :flowchart 

6" 



Does it handle all possible cases? 
in enough dajtail to handle the stitky parts of the 
program -before you actually start to write the pro- 
gram. If necessary , break up the Arogram intp^^ajib- . 
routines. Include check point and Id iagno8 tic print- 
outs In. the planning stages » ratherUhan after the 



errors occur. Check your logic one more ,tim©. 

\ 

You should bd in thd habit of writing ^ initial conunent© 
section at thfe beginning of the program. This comments 
section should include your name, ddte, problem name or ^ 
titlcr, a brief description of th@ problem, a lielt of 
variable?, defljaitions ivnd formats of both input and 
output variables, their function in the program and their 
dimensions, a description of special or exceptional ton- 
ditions, and possible error conditions. 

Place all of the type declaration statements at the 
beginning of tho program inanediately after. the initial . 
commenta section. These declarations *^clu44' COMb^, 
DIMENSION, INTEGER. .REAL, DATA, etc. 

Reserve a block of statement numbers for FORMAT statement 
numbers - for exansple, 200-299. Place all FORMAT state- 
ments iDuaediately after the type declaration statement?. 
In this way it- is po8a|ble to check easily the existing 
FOR>tAT statements to determine whether it is necessary 
to add anothevT FORMAT statement or whether a current one 
will do. As a rule you will be adding and delecihg mite 
statements during the debugging phase. A block of reservpid 
FORMAT statement tiumbers x^ill simplify the process. 

Reserve another block of statement numbers as FORMAT 
statement numbers for temporary dia^ostlc type printouts. 
Place the FORMAT statement right next to the WHITE state- • 

. 208 • • 



nwsrnt. If both ar@ j^unched on opposite cut cards from tile 
roflt.of the program (on the bacK side of a FORTRAN card, 
for eKjample) / it ifi easy to remove both when you are 
finished with them, 

6. Keep your READ, WRITE, and FORMAT statemento as simple 

as possible. The more you try to include in these state- 
ments, the mor<a*likely you are to, have trouble. 




7. Use I a ^CONTINUE statement as the last statement in the 
range of a DO, Use separate XJONTINUE" statements for the 
ranges of nested DO's. Use a CON'llKlNUE statement as a 
reference point for GO TO statements. Then it Is easy 

to Insert. or delet©-^othar statements without having » 
tq repunch the statement number and shuff^ the cards. 

8. Parenthesize your program by indenting parts of the pro- 
gram that are i^i the same logical- block. In particular 
parenthesize the statements that are in the range of a 
DO statement. 

Example 

' V DO 37 I « 1»N 

T ^ 8*6-4. 0>^A*C 
DO 35 J ^ 1,M 

S(I,J) « T*X(I) 
R(I,J) « T*FL0AT(J)*Y(I,J) 
35 CONTINUE ' - ' 

37 CONTINUE . < ' 

9. Us© variables rather than constants if there is a remote 
chance of having to make .a change- in the value of the. con- 

/ 

\ 
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I etant. .For example, 'if you have eevejfal statements 
- the form . 

DO ^ I « 1,10 

It is aa^ier to make a single change of t\\k form 

lUP « 15 

\ 

provided all the DO's originally were punched as 

H 

DO — I « 1 , lUP . . 

than to chaugge each DO ''individually . 

After you have tried ^he program on th^ computer and 

found that* it contaix)^ arrors, theii you should begin by 

correcting compile errors p that is, errors which prevent"^ 

ad thife compiler from making sense out of what you wrote* 

Generally the compiljar will list suqh errors • Some com-- 

pliers (WATFiy, for ej?:ample) list? mo^t of the error diag-- 

fi • 

noetic messagee immedi'atel;^ following the statements con- 

*■ 

tainlng the errors; some (1130, for example) list all of . 

^ 

the diagnostic messages at the and , of the program listing, 

Oft^n one error may produce several diagnostic messages > 

some of which may not appear to be relateU to the error • 

Usually > in such cases » howfeyer, it least one of the 

messages will <be meaningful. 

When there ate no compile errors, the program may 
J, ♦ 

still contain eK^c utlon ,eg rro r s ^ errors which make it 
Impossiblfe for the comput;ier to perform the rnstructions 

■ ' 



given to it^ §om compllere (WATFIV. for example) give 
diagnostic messages for execution errors; some (1130, 
for example) give no error diagnostics. 

Here are some general suggestions foTTemoving 
compile and axecution errors: 

* 

- 10, Check the punched deck ' for mlspunched characXer.8, 
words spelled Incorrectly, Interchanged letters, 
etc. Also check to see that the correct columns 
arp used — statement' number i^ 1 to 5, continua- 
tion In 6, Fortran statement in 7 to 72. Make 
•sure that all conmient cards have a "C" punched 
" in column 1. 
U. Check control cards to see that they are in the 
proper order and are correjitly punched. 

12. Use the error messages to see which lines cause 
cowplle errors. Remember that the error messages 
may not alwayg diagnose the error clearly » but 
they do m'form you which line is, in error. Check 
the correct form of the s^iatement with the text- 
book for commas, parentheses, mandatory use of 
integer -numbers, etc, • 

13. Use the toFIV diagnostic messages .to find exe~ 
cutlon errors. Tine messages "tell in which lines 
the errors are. Again be aware that the error 
message ma^ not always diagnose the fault exactly 
Check the form of the statement; check to be sure 




J - 
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EVAXiUATIONs' You haVe already been debugging programs now for 
some time. You probably have s\pme notion of yo 



/ 
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< 'that the type of the variables is consistent - 

-it 

feal numbers read with- F-type formats, charac- 
tera compared with characters In ah IF statement, ^ 
etc. ^Check.for keypunch errors involving mis- 
spelling in variable. names. Also check for 
reversal of row and column subscripts. 
V. l'^. If there ai-e no error messages, but the answers 
are wrong, three main methods are used: 

a) Intermediate results should be printed out 
if any lorfg calculations '^re performed,; 

write statements may be Inserted t;o cjheck ^ 
on the ofder of execution of the statements. 
(Unformated I/O in WATFIV is useful here. 
See "Format-free I/O" under "Language Exten- 
aions," page VIII. 7 of Appendix VJII.) 

b) Go thru the program statement by statement, 
performing all operations by hand and keeping 

^ track of the current value of the .,\(4ariables. ^ 

c) - Break up the" program into segments or sub- 
- : programs, running, each individually to pin-™ 

point, where the error occurs. ' . • 

There is additional information in Appendix VIII for 
debugging using the WAl^FIV compiler. See partietilarly. pages 
VIII, 17^ VIII. 19. ' 
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success or lack of It In debvjgglug yQur# owi\ programs. 

What*© it like to debug aoiriaona else's program-*- 
one you didn't xvrrite? Your Qucces@ at this task is ' - 
a real measure of your debugging sbilllty- Report.' 
to your instructor; he will givte you a program list- 
ing that* contains errors for you to debug. 

ASSESS>iENT TASK: Now that you are saturjiited with "bug killer''^ techniques 

you are ready for the acid test* It is now your tuirn 
to climb over to the other side and help those ^^rther^ 
down the ladder with their cJebOgging problems. Be 
gentle, be tactful, ask penetrattng questions^ try to 
Heifi/ the neophytes learn' how to debug. If. all\lse " 
fails and you are in dire need to convince the neophyte 
that he can, improve his technique, , -you may ask in a 
controlletd manner, ^'Why in thunderation did you do that, 
stupid?" 

•When you are ready, report to your instructor and 

> 

he will set up a schedule for you to be" in diagnostic 
lab for sev©|^al hours in the tiext 2--3 weeks. Keep a^^. 
detailed log of your 'activities by filling out the 

form on the next page. You will be supervised by 

/' 

the diagnostician regularly issigned to thf diagnostic 
lab. Be sure to get his slgnajture and his evaluation „ 
whesT either you or he must leave the lab. When you 
have "served your time," then take your log sheet to . 
your Instructor for his- approval. 

' 213 



Lofe for Dlagijostlq Lab 



^ "S^' for satisfactory; "U" for unsatisfactory < 



Placa remarks" belov or on back. 
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At this polr^the remaining units probably are 12 and 
16. Ygu may> elect eiiher one of these. If you have 
completed them> then you are ready to do UNIT 17, whldh 
is the laat oae >' 

f 
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UNIT //15 (COMSO 



This unit' has Keen o^^tted from this manual. 
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' ' UNIT //16 (COMSC) 

TITLE: COMI>ufER CONCEPTS 

RATIONALE: After proceeding thl§ far ln:^^i:he COMSC sequence you 
; should be wondering' wh^ic is really going on In 7t:hat 

compu^r. How does it put prog;rains, subprogrania , 
instructions, and data together in a way th3t mean- 
ingful results occur? This unit should give you 
^ soma insight into basic hardware elements of a 

computer and a feeling for the relationships that 
ex^st b©tw©^ hardware and programa. 

OBJECTIVES: Describe hardware features of two different 
machines.^ Describe the ln€er relationships 
between hardware features and various features 
' used in setting up a Fortran program. 

PREREQUISITES: UNITS #11, 13 (COM^C) 

ACTIVITIES: We shall take some time out here to describe' 

hardware aspects of several dl^f^rent computers. 
A spectrum of references exists on different ma- 
chinea. The most coraprehenalve-to date Is the 
book by Bell and Newell which discusses in detail 



many existing computers. The bt>ok by Flores 

\ 

discuegas briefly the organisation of several ^ 
different computers, while the book by Iverson 
. ' introduces an elegant language that can be used 
to describe computer instruction sets concisel^. 
The book by Struble refers specifically „t^ 
IBM/360 series and the book by Louden refers to 
the IBM 1800 and 1130 machines. Both of these 
books dea^with assembly language progranmiing 
for the respective machines. 

G, Bell and A. Newell, Computer Structures ; Readings 
and Examples, McGraw-Hill, 1971. ~~ 

Flores,' Computer Organization , Prentice Hall, 1969. 
Iverson, A Programming L anguage , Wiley, 196^^. ^ 

K. Louden, Programming the IBM 1130 and 1800, Prentice 
Hall, 1967. , ^ ' 

Struble, Assembler Language Programming thei IBM System/ 
360, Addison Wesley, 196^. ■ — 

s 

Experience with assembler language programming . 
Is necessary to get a real feeling for computer hard- 
ware and its relationship to higher level programming. 
If you find t^he concepts described here and In the 




readings of Interest » you might want to get some 
experience with a8S<^bl6.r language progranuaing 
followed by additional experience with compiler 
writing and studies In computer >)rganiaatlon. 
One of th© best, ways to get an understanding of 
computer hardware concepts la to get hands on 
experience on a small computer such as an IBM . 

» 

1130, a Digital Equipment Corporation PDP-8 or 
PDP~11, a Hewlett Packard hp .2100, or some 

slaillar machine. ^ 

( ■ 

Computers can be described In terms of 
processors (P) , memory (M) , switches (S) , control 
lines (K), and Input /output devices. Ball and 
Newell refer to puch a description as a PMS descrip 
ti6n and have created a. special language to facil- 
itate the discussion of a PM:^ description. Com- 
puteys can be described also in terms of instruc-' 
tlon sets, data representations and registers.' 
Iverson created an elegant l^nguagfe for the de- 

e 

scrlption of Instruction sets. Bell and' Newell 
created a different language for' the descriptloti 
of instruction sets. Although these languages 
are .well designed ,to describe machine 'Characteris- 
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tics, we shall not use them in this unit sine© 
It takes Bom study to become proficient with 
their mu^ 

Th^ memory of a computer stores data and 
Instructions. Just as Fortran statements are 
arr anged in cards in sequence y ina chine Ins true- " 
tlons are arranged in memory in* sequence. Data 
also are arranged *ln memory In sequence. The 
only distinction between data and Instructions 
is that itxstructions are interpreted and, exe<:ut- % 
ed by the computer whereas data are not* 4t 
times, instruct ions may be operated on as data. 
Present day cc^^ter inemoriea are made of magnet- 
ic cores. New technologies are under invastiga- 
tion for faster cheaper memories. Most of the 
memories operate in a two state, or binary mode, 
that is "in an "on-off " or "0 - 1" mod^. Tt«o 
state devices a^ fast, reliable, stable and 
reasonably cheap! Devices with more states ' 
currently lack one or more of these required 
characteristics. 

Because of the use of two state technology, 
computers ttormally operate in a binary arith- 
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metic mod®, W© shall discuss binary, octal, and 
hexadecimal arithmetic later. Memory la organized 
In a hierarchy of bit patterns. Two of the funda- 
mental bit patterns are used to represent charac- 
ter^ and groups of niM>ers, Some cojnputere use 



6 bits to represent k character resulting In 2^ 
or 64 if ferent^nique characters; Recent t:oiilputer8 
use 8 bits to represent a character • How many 
unique characters are possible with an 8 bit repre- 
sentation? " j^^^^ 

Sample character codes are shown in Table 16*1. 



J 
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ASCII 




/ 


IBM 


• 


character 


8-bit 


6-bit (TTY) 


8-bit 


6-bit 


blank 


1000 0000 


10 0000 




0100 0000 


ii 0000 


A 


1010 0001 


00 0001 




1100 oool 


01 0001 


b 


1010 0010 


00 0010 




1100 0010 


01 0010 


-- - ■ -I- - 




/^ft — *f AAt — * 

uu luOl 








1010 imt — 




"11T)0 1001" 


01 1001 


J 


1010 1010 


AA 1 A1 A 

UO 1010 




1101 0001 


10 0001 


K 


1010 1011 


AA 1 A1 1 

UU .lUll 




1101 0010 


10 0010 


R 


1011 0010 


01 0010 




1101 1001 


10 1001 


S 


1011 0011 


01 0011 




1110 0010 


11 0010 


T 


1011 0100 


A1 Al AA 

ui yioo 




1110 0011 


11 0011 


'I 


1011 1010 


01 1010 




mo 1001 


11 1001 


0 


0101 oooo 


1 1 AAAA 

11 0000 




1111 0000 


00 0000 


1 - 


0101 0001 


11 1 0001 




1111 0001 


00 0001 


9 


0101 1001 
^0100 1000 


0.1 1001 




1111 1001 


00 1001 


( 


10 1000 




0100 1101 


11 1100 


) 


0100 1001 


10 ioq;i: 




0101 1101 


01 1100 


+ 


OICO 1011 


10 1011 




VJLUU XXJLv 


01 0000 




0100 1101 


10 1101 




Olio 0000 


10 ODOO 




0100 1110 


10 1110 




0100 1011, 


01 loli 




0101 1101 


11 1101 

* 




0111 1110 


00 1011 



TABLE 16.1 
SEVERAL DIFFERENT CHABACTER CODES. 



Th®s@ character codes are recognized by 
different organizations and di^ierent computers. 
The ASCII cod© (American Standard Codes for Infor- 
mat ion I^nterchange) la the result of an attempt 
to standardlae character codes. The podes imple- 
mented by ^computer manufacturers differed consid- 
erably from the codes used hy the common carriers 
(telephone^ telegraph). iPrfoblems arose whan com- 
puters wer© attached to conroon carrier lines. The 
ASCII cod© helps to provide standards for two pre- 
vlously independent industries. 

/.it 

The extended binary £oded decimal Interchange 
code (EBCDIC) is usi^d by IBm' 360 and 370 computers. 
By replacing a .single bit under program control -in 
a 360 or 370, that machine will recognise ASCII 
code. However. IBM, at present, does not' support 
software to us© the ASCII code. • 
There are two places where the character 
codes play Im^qrtant functions. One of these 
has been discussed earlier, namely the number 
of bits need to represent characters. Th© more 
bits per character, th© greater the number of 
uaiqu© characters that can be represented *by 
the code. The choice of the bit codes to repre- 

t 
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8€r«t characters Is of lasting Importance to the 



program^ners. Since k character Is represented 
by a string of bits, that character code also 
' can b© thought of as a number. When all the 

-characters are -arranged- in -sequence by their 

numeric codes' the resulting sequence is called 
the collating Sequence, Arrange the characters 
presented in the previous table in Increasing 
sequen?:© according to their 8 bit codes; 



alphabetic sequence according to the ASCII 8 bit code» 
would that list also be in Increasing alphabetic se- 
quBnce ^according to the IBM 8 bit code? . ■ ■ 

< 

What do you think the 8 bit IBM code and 8 bit ASCII 



IBM code : blank, ,\ 



ASCII code: 




If a list of peoples' names were placed in increasing 



for G» il, L» Q and V should be? 



8 bit IBM 



8 bit ASCII 
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8 bit' IBM 



8 bit ASCII 



V 



Both character codes arrange the alphabet in 
-iacmaaing -aaqueaca, -The IBM character code haa 
'holes' in it between I and J and betweGn R and S 
whereas tM ASCII code assigns 26 consecutive 
numbers to the 26 characters ttf the alphabet. If 
a file. is placed In ascending sequence according 
to the ASCII codQ and then printed, would the list- 
ing be the same as if the file were placed in 
ascending sequence according to IBM code and then 
listed? The answer depends ott what was In the 
file as followsJ 



characters in file 

alphabetic only , 

numeric only 

alphabetic and 
numeric , 

alphabetic and 
special cl^ra.c^fsrs ? 

numeric and 

special characters ? 



pi:^inted llstiny^s the same 
yes 
yes 



no 



my7 
Why? 
Why? 



The fact that different character codes ©atlst can 
be of concern to you in applic^itlona where the inter* 
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prestation of th© cod® is y<|g'end©nt on the specific 
code usad. 

Since any group of bits could be called a 
character > if ono is interested in processing char- 
acter©, th© computer should have an easy way to 
manipulate characters. Such machines ax-e referred 
to as data processing machines* Other applications 
require the computer to perfox'm/a large number of 
coijjputations quickly. TtlOi^e^achlnoa are called 
scientific computers ov \B^ber crunchers. " Sevn^al 
computers bridge the gap and pro^^idW5 both character 

i 

manipulation and scientific computing capability so 

« 

that the dichotomy no longer exists for those com< ' 
puters* 

The arithmetic data' representations also are 
important *ln describing a computer* Binary is 
^usually the base. Integers are represented 'in 
terms of binary integers. Real numbers are repre- 
sent^ in terms of "floating point" numbers. A 
floating point number consists of three parts: a 
sign» an exponent and a memtissa. The exponent 
-xmy be in terms of base 2 or base 16 on a binary 
machine. In order to represent both positive and 
n^gftlve ^Kponents and positive and negative values 
with a single sign position * the sign of the expo- 
nent part is determined by its. magnitude eoinparod 
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with the largest magnitude allowed for an exponent 
For example on the 360, 7 bits represent the expo- 
nent (a total of 128 different exponent values). 
Those exponent values that are greater than 64 ar,e 
considered as positive exponent Values, whereas 
those exponent values that are less than 64 are 
considered as negative i^xponent values. Such 
notatipn is given the name "excess 64" represen- 
tation. On the 360 the baae for the exponent is 
16^rather than 2, while the base for the value is 
2, Given the numbers 

exponent value 
65 xxxxxxx 
68 XKXxxxx 

where xxxxxxx stands for the same mantissa in 
both cases » the second number Is 

16^ « - 2^^ 



larger in magnitude than the first number. 

Numei^ic data are said to occupy a "word" or 
group of x^^orda on a computer. Examples" of word 
slssea are 



computer - word slae 
P»3P«8 12 bits 

HP-2115 16 bits 

IB1?1"1130 16 bits 

IBM 360 32 bits 



IBM 7090 36 bits 

CDC 3600 48 bits 

CDC 6600 60 bits 

\ 

■V, 

Other numeric representations are pc^ssible. Half 
word or double word repreeentatlotts provide for 
more economic use of storage space in the first 
instance and for' more accuracy in the second* 

What other features should a computer have? 
(Your experience with Fortran should help you with 
this one.) 



1 

/ 



>-^computer should be able to perform calculations 
and tests. It should be able to initiate an input 
and an output. Furthermore, it must be able to. exert 
control over all of these functions. 

Calculations are 'performed in registers on most 
of the scientific machines. A register contains the 
same number of bits as a word.. Registers in which 
computations are performed usually are called the 
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accumulator and the apcumulator extension. The 
©xteneion is th© least 



1 word I 1 word 



^cc acc extension 

a lgn ifl cant - par t- oJE -tha-^ccuinulatorr-accUmulator 
©xtenalon pair. Addition and subtraction take 
plac^ in the accumulatoj, wC^reas multiplication 
and division take plac^ in the pair of registers. 
Tests can b^^ performed to determine whether the 
previous result wore zero, negative or positive v 
v^J^^Jfettt^ Fortran statement performs this test? 



"Suppose the Fortran i$tatemgtit 
IF (A - 7.2) 12,6,29 



were executed and A had the value 7.19. Ji\fhat would 
be the next statement to be ^ecuted? 

C 

The computer might translate this Fortran statemi^nt 
to a sarlea of niachlae instructions similar to the 
following: 



load the jaccumulator with A 
subtract 7.2 ' 

branch if aoc < 0 to statement 12 
branch 1£ acc ■» 0 to statement 6 
branch if acc > 0 to statement 29 
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Th® IB^^/^60 has 16 general purpose registers for 
performing integer arithmetic instead of a single 
accumulator and a single: extension. It also" ha@ 
4 floating point registera for performing float- 
ing point arithmetic. The IBM llBO has an accujnu- 
lator and extension for Integer arithmetic. Float- 
ing point arithmetic is simulated by software rafher 
than hardware. 

The machine instructions are. executed sequent- 
tially similar to Fortran statements. The sequence 
is altered if a branch condition occurs, 

^ Input /output occurs between memory and some 
external device • The list of different extamal 
devices that can ba attached to a computer i© an 
ever expanding one. Examples of such devices are 



^ magnetic disk 

magnetic drum 

magnetic tape 

magnetic strip 

punched card teader 

magnetic card reader 

optical card reader 

ptjnched paper tape 
reader 



card punch 



teletype keyboard 

typewriter keyboard 

character display 

vector display 

incremental plotter 

line printer 

character printer 

analoig interface 

cowmunications later 
face 



/ 
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paper tape punch , another computer 

Frequently a small computer is used to control 
the input/output. Such a device is called an I/O 
processor, yhe CDC 6600 has 10 peripheral proceasors 
attached to the main processor. Each of these perlph 
eral processors is given a .specific type of task to 
perform. .Other computers have^ special purpose com^ 
puters which control input/output o'peratlons for the 
faster d^vi^es. Such special purpose computers, or 
control units, have a limited Instruction set which 
specifically relates to input/output. 

A simplified diagram of a computer appears in 
FIGURE 16.1. 



input /output 

j_ 



memory 



arithmetic 
unit ' 



4» 



i: 



control 



I 
I 

1 - 




, .FIGURE 16.1 
THE MAIN COMPUTER COl^PONENTS. 

In this eKafljple data paths are aolid lities, cont]coX 

paths are broken lines . 
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Draw a simplified di^agram of a computer 
which, includes a secondary m^ioify such as disk 
which has a ddta'ipath to memory ati^ a -control 
path to *th© control unit. 



it 



Consider "the Fortran expression 



R'« A + B * C 



1 JPo 



What coraponent!|rof the computer desd^bed in the , * 
previous diagram are activated at each stage of 
this computation? 



1. load'B 

2« multiply 
by C 

3, add A 

4. store 
result in 

R 



control, memory,* arithmetic unit 
control, memory, arithmetic unit 

control, memory, arithmetic unl* 
control, arithmetic unit, memory 
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What compoaants "bf the computer d@8crlb04 In the 
diagram are activated by the instruction 



RMD(5ail) A,B ?' 



!• forouat 111 
2V read A 

3. format 111 

I 

4. read B 

5. format 111 



What components are activated by the Instruction 
WRITE (6, 113) C,D ? 

'. ) ™_ 



1. 
2. 
3. 
4. 
5. 



What components are activated by the instructl^ 

-v. 

XF (A~B) 12,13»12 ? 



1. load A 
2» £iubt:ract B 
3. branch 
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Refer to UNIT #16 ACTIVITIES TABLE for more 
information. 



^UNIT M (COMSC) was concerned with loops and 
methods for executing loopd in Fortran. The example 
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SUM-0.0 

DO 17 I«1,N 

SUM-SUM+X(X) 
CONTINUE 



illustrates a loop in which the addresses associated 
with the array variable X are modified successively. 
Recall that X(l)- is the addre8.s of the first element 
of the X array, X(2) is the address .of the second 
element of the X artay, etc. A computer must have 
the ability to computej addresses of array elements 
easily. ^ One method of calculating addresses is to 
make use of a special register (or s6t of registers) 
called an index register. The address of the array 
X is held in the instruction; the index is held in 

t 

the index register ^ the address of X and the value in 
the index register are added to produce an "effective 
address" that is used to reference the location X(I) 
in momoTy. If a menfory reference instruction is^ to 
use an index register, an Indicator must be set in the 
instruction to that effect sometime pr^or to the exe- 
cution of the instruction. For the statement 



16.19 

a schematic of effective address calculation, assuming index 



register 3 contains th© indox, appears as follows:" 



instruction 


instruction 
address 


index 
register 3 


effective 
address 


load accumulator from SUM 


SUM 


i 


SUM 


add to accumulator from X 
modified by IndctK ragistfer 

V 




1 


X+±- 


store accumulator into SUM^ 


SUM 


i. 


SUM 



The increment step of the DO. loop modifies index register 3 and 
also te^jts index register 3 to determine vrhether th© loop has 
been completed. Symbolically th© effective address computation 
can be represented ae follows J 




• * 

miere < 

AR Is the address r0glster, ' - 

IR ia tha index Register » ' 

M Is the effective address. 
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Th© EA is enclosed In a da@h®d box to Indicate that it does not 
appear in storage; rather it is created, used, and discarded un- 
cerQinoniously in fractions of a microaecgnd. 
The Fortran stateiaents 



57 



DO 57 J«1,N 

X(J) >«• y(J)+A(J) 
CONTINUE 



illustrate more graphically th© usefulness of an index register 
in effective address computation. Suppose index register 2 con- 
tains the index J. Fill in the following t^ble that simulates 
effective address calculation* 



instruction 


iudeJc 


effective 


address 


register 2 


addre88 


Y 


J 




A 






X 


- i 





In this case index register 2 is used in three effective address, 
computations. 

. How many index registers does a computer have? That depends 
on the sp|clfic computer. Some computers do not have index registers 
others have three, others have eight, still others have fifteen. ^ 
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Th© 1130 has 3 indax registers; the 360 hm 15 registers 
that may be us©d as index registers. One must b© able to 
B61 an index register to an initial value. incr«im©nt (or 
decrement) an index register, test an index register, 
branch based on the test, and stor® an index regis tdr. 
Such capabilities ar© impl^mantod differently on different 
TOSchlnes. 



Other hardware features include base registers, in- 



direct addressing, floating poi^t registers, interrupt 



- facilities, input /output channels, multiplexor channels, 
control units, peripheral procesaora, memory locks and 
keys (also called memory protect), and relocatabillty. 
Many of these topics are covered in a course in assembly 
language programming; o»the«rs are covered in tppics in / 
computer organization. 

The types of data a computer allows are an important 
key to its character. The set of operations which a com- 
puter performs is another basic indication of its charac- 
ter. The IBM 1130 has ^ basic instruction set of 29 in- 
structions, while the IBM 360/65 has over 140 instructions 
and the IBM 3^0/145 has over 160 instructions*. Subsets 
of the instruction aet pertain to specific hardware func- 

^ tions. Several of these. functions are listed below. 



i' 



< 
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function 



arjlthmotic 



l^ndex register 



bit manipulation 



character smnlpu- 
lation 



Input/output 
miscellaneous 



ingtiuctlgjl typej . 

loading a register, storing a 
register, addition, subtrac- 
tion, multiplication, division 
In binary Integer, floating 
point, and decimal, round, com- 
pare 

, *('■ .} 

load index, modify ind^x, store 
.index, tost indax, branch on 
' Iridex 

test bit, insert bit, shift 
register left, shift register 
right, rotate register, store 
bit, and, or, excluslv© or, 
mask, test 

move character. Insert charac- 
ter, test character, translate 
character, edit character 

initiate I/O, test I/O,: test 
channel, stop I/O 

Interrupt processing, storage 
protect, error recovery 



/ 



Since computer instruction sets vary widely, not all com« 
puters will contain all of these functions. If a computer does 
not have floating point hardware, floating point arithmetic may 
be simulated by a program. The resulting simulation is a great 
deal slower Ok execution speed than hardware would be, however. 
Most of the functions listed a^ove may be simulated by programs 
if they^do not exist on the particular computer. Exceptions ... 
are Input/output and interrupt processing. These may be quit© 
difficult or^impossibXe to simulate if the hardware do©a not 
©xlst oa the machine. Many of the hardware "features on today's 
cotoputere wiare simulated by programs on earlier computers, in 
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fact, nuiltiply and dlvldo are simulated to this day on some 
computers by making ua© of repeated additions and shifts in 
the first casa and by repeated subtractions, tests, and ahiftQ 
in th@ sacond case! Thos© software slxoulated faatures that 
proved useful were incorporated into the hardware of lat^r 
machines • Floating point, index registers, character manipu- 
lation, storage protect, and interrupt processing are a few 
examples of software simulatGd features that hav© been incor-- 
po^rated into hardware. 

SELF EVALUATION: Suppos^^'^a. qoiuputer as a 4 bit accumulator and a 

four bit accumulator ©xtenslon. Suppose 



D G^J J I.XlQj 



L AC^ ACC EXT 

^ the contents of both ACC and ACC EXT can be shifted 
left by 1. Suppose the leftmost bit, of ACC replaces 
the bit In L after the shift. Suppose the L bit can 
be tested for 0 or 1, Draw a flowchart to simulate 
multiplication by addition by loading the multipli- 
cand in ACC, shifting left the ACC and ACC EXT one 
position, testing the L bit/ If the I, bit the 
multiplier should be added into ACC EXT. The' product 
appears in ACC and ACC EXT. 
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Answer ; 









Load taultiplicand into ACC, 






Shift left on©. 












Is L bit 1? 






Add multiplier to ACC ETI. 




No 








Is K»4? 




Store product 



No 



ASSESSMENT TASKS: Report' to" you,; instructor ^nd discuss the 

assessment tasks with him. 



WHAT NEXT? You may do either UNIT #12 or UNIT #14. If you hav^ 
completed 12 and 14, then you should be ready for 
UNIT #17, the last one. 
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.UNIT //1 7 (qOMSC) . 

i 

N 

TITLB^ Gcinaral Fortran Programs 

% 

RATIONAX^Ej Constructing general, ©fficient, accurate and skillfully 
done computer programs for, solving problems is a worth- 
while goal for any programmer. Tliat goal alao happens 

« 

to b© the overall objective of this course. 

You should by this time have dev©loped considerabjl© 
expertise in constructing Fortran programs and running - 
tham on the compute^. Now you should put that skill to 
use in a fairly sophisticated problem solving situation* 
OBJECTIVES! At th« en4 of this unit you will demonstrate your 

ability to solve problems efficiently and accurately 
using Fortran programs that you construct and a com* 
puter. 

PREREQUISITES: If you have chosen the option of t/ying for an "A,' 

then UNITS 12, 14, and 16 are required* If you have 
chosen to try for a "B," then only UNIT 12 is re- 
quired. ., . ■ 
ACTIVITIES: " . 
A. ■ Some general cons idd rat ions 

Fortran program of optimum worth is one that is 
accturate'and eff i cient * Some of the considerations regard- 
ing accuracy were discuasod in UNIT 12 and will iier^ be 
discussed again in this unit* Rather we will focue on 
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efficiency* 

An efficient program is on© that uses th^ computer's 
capabilities to the greatest advantage^ Efficiency augg^ats 
in particular that tha best possibles use be made of tha com*' 
put^r's storagel^d time. Execution time, compile tima, and 
required storage should all b© miniml^sed with respect to each 
oth^r. Sine© those variables are all int@rd©p«^nd©nt , mlnimiz-- 
Ing one may Increase another; soma compromisas will be necessary 
Let notice some of the factors Involved in efficient prograitt- 
ming, 

1. Length of program. A program that is longer than 
necessary will pntibably r^^qulre more compile time, 
more exi^cution/time^ and more storage for the object 
code. As the program is shortened > these variables 
will t>end to decrease. If, however, the program 4s 
made much shorter by combining statements and , opera.-* 
tions as much as possible* the compile time will 
tend to. increase — in some case's, drastically; the 
required storage and execution time may also be 
increased. It is importanjt to realisie'then that 
the shortest program is not necessarily the best. 

2, Sequence .of operations. In general, the more 
operations the computer has ,to perform, the^greater 
will be the execution time. Unnecessary operations — 
juch as transfer to another transfer statemen|; and 
then to another statement, rather than a direct 
tr^sfer to the last statement mentioned «— should ' 



always be avoided. Arithmetic eKpr^sseion^ should, 
in general, be (|rrahg®d so that utinecessary opera- 
tions are not performed. (Not only do' unnecessary 
op'erations require extra exeoution time, but also 

• ■ . 

accuracy is reduced^ as discussed in UNIT 120 
Th© same is true for assignment statements • <For 
e}cample> ^0 requires integer §:ero to be converted 
to real zero before it is stored into X»0.0 
rexjuires no unnecessary operations ♦) 
Input and output* In general^ any kind of I/O ^ 
requires more execution time tThati internal miachine 
op<&ration0. A program may become ^^l/Q bound," 
that is, the computer i^ having to use much o^^ its 
execution time for I/O to occur. It is very easy, 
for exaiiflple, to ^use the 1130^ with a typewriter^ 
pVlnter to be I/O bound, sine© the printing is very 
8low. The 360 handles I/O much more efficiently l?y 
)a process in which I/O is performed through Inter- 
mediate magnetic disc storage which has a very small 
access time. Therefore, X/0 does not slow the 360 
very ro"<^h at all. Even so, excessive I/O shou'ldxbe 
avoided. 

Storage for variables- and arrays. When reserving 
Storage for arrays, you should use only -as much 
space as necessary. If you can avoid the use of 
arrays, that may be- even better. Us^ as 

{ - 

variables as possible in a program, for example, 



r 



U8© on© variable for the Index of all unnested DO 
loops. For another eKamprie^ consider the program 
segments in Figure "17.1, which find th© average ofl 
ah array of numbers. .The one on th© right makes 
better us© of storage by Wing less variables than 
th© on© on th© left. , Reuse variables whenever 
possible. 



SUM-0.0 .. . AVG-0,0 

»P 1 J-I.n; " . DO 1 J«1,N 

SU^-SUM+A(J) ' AVG-AV(>fA(J) 

1 CONTINUE ^ • r CONTINUE 

. XN"N • ^ XN-N 

AV03U>1/XN , . ■AVOAVG/3QJ 



Figure -17,1.- A program s^meht for calculating 
the average of a set of numbeijs, illustrating 
how variables may feV reused. 



5. Mixed mode. If miated mode ^rithmetip i» 'Available, 

: . ^ • ri{ ^ ' ' 

usually it is slower thafi arithmetic on a single 

mode. Since mixed mode Arithmetic i^-e^ulres extra 

operations for changing all operatids to the same 

type, in general ^it should be avoided, especially- 

if the expression is in a loop. Examine the pro- 

g-ram segment In Figure 17.2, which generates a 

tabli© of X and y values for the equatioij 



y ^ 3x' - 2k^ + 5x - 2. ^ 



Since the calculation of y occurs in a loop, the 



Integer couBtanta in tho polynomial must be cohv(i?t- 
ed to real constants with each^^lteration. Increasing 
execution time. Mixed mode should not be used in this 
expression* In fact^ there Is never any reaaon to 
use mixed mode operations in which one or more of the 
operands is a constant written in a different mode from 
that of tho rest of tttfe expression. 



DO 2 J«»X,50 
kEAD(5,10)X 

Y ^ 3 * X*^3 - 2 * X*A2 + 5 A X - 2 

C 

C , THE EXPRESSION SHOUI4B BE WRITTEN 

C Y - 3.* X**3 - 2i* X**2 + 5.* X - 2. 

C . . 

WRITE(6,10)X,Y ' 
2 CONTINUE 
10 FORMAT ^lX>2nO. 2) 



Figure 17.2. Program' segment iHustratl^g an 
inefficient mixed mode expression, (Notic© that 
XAA3 i^ not mixed mode.) 



V^Qr-& are cfisea in which mixed mode is definite- 
ly advantageous. Refer to the program segment In 
Figure 17. !• In the calculatTon of the average where 
AVG/XN is evaluated > compllq! time, execution time, 
and storage requirements for variables and the object 
cod© \9^Xd probably b© reduced by using the mixed 
mode axpraaaion.AVG/N> since the statement '3£N=«N is 
#Kabsent ani^^ea not have to be c^tnpiled^ at&ed, 
atM§ executed • Besidea that> storage for one lese 



■ r . 

variable (M) Is required. Mixed raod<^ may be 
useful, then, when both operaxids are variables 
and the expression is evaluated only^once (or 
very few times) in the program. If, however, 
N, for example, were to be used several times 
as an arithmetic operand in one or several mixed 
.mode expressions then^ probably addition of the state 

_ _ _ —'L. 

merit XN««N "arid" subsequent usa of would be better V 

Mixed mode is useful when used with discretion,. 
Integer arithmetic, Integer (fixed point) arithme- 
tic is considerably faster than real (floating 
point) arithmetic, since there is no decimal point 
to keep track of. Integer arithmetic should be 
used whenever possible, and especially all counters 
should be in Integer mode, 

DO loop6\ DO loops may or may not require extra 
compile time and execution time, depending on the 
compiler. But, as a general rule, as few DO state- 
ments as possible should be used i^a program. For 
example, instead of using two short DO loops, com- 
bine the two into a^ngle loop, if possible. In 
Figure 17.3 there are two prograig segments for 
finding .the sUm and the sum *of the squares of. the 
elements of an array. The one on the left uses' 
two DO loops, making tt^o passes through the array, 
while the one on the right uses only one loop and 
makes one pass thtough the array. The efficiency 
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has also been Improved slightly by using the 
multiplication operator instead of th<s' exponen- 
tiation operator and by eliminating the CONTINUE 
statement. 



INEFFICIENT PROGRAM 
S-0.0 

W 3 K«1,N • 
S-S+A(K) 

3 CONTINUE 
SSQ-0.0 

DO 4 K-1,N 

SSQ«SSQ+A(K)*A2 

4 CONTINUE 



MORE EFFICIENT PROGRAM 
S-0.0 
SSQ^CO 
DO 3 K«1,N 
S-S+A(K) 
3 SSQ*SSQ+A(K)*A(K) 



Figure 17.3. "Program segments for finding the sum and 
the sum of the squaires of the elements of an array. 



Another important rule is that you should 
never put unnecessary operations inside loops. 
Figure 17.4 illustrates an un^cessary step, 
XN-N, that must be performed needlessly N-1 times, 
having a, need to be performed only once. 
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C UNNECESSARY STEP 
C INSIDE A DO LOOP 
S-O.O 

ElO 6 K«1,N 
XN«N 
S-S+A(K) 
6 CONTINUE 

AV*«S/XN 



/ 



Xi&uxe 17*_4» P_rogram_.sej;m 

average of the €».li^ment8 of an array. 



B. Storage of character data. Character strings should 
be stored so that the maximum numbar of characters 
is placed, into tha storage locations. For the 360, 
in single precision a maximum of four characters is 
allowed (^ight in double- precision) , while on the 

• " 1130 it may be four or two, ^depending upon whether 
the storage location is associated with a real type 

or an integer type, respectively o If you wish, 

it 

» 

however, to make use of single character data In 
a program,- then you will have to store just one 

IP 

character per storage location. (There are ways 
around this problem, but they are beyond the scope 
of this course.) ^ 
There are many other factors to be considered in various 
situations. But out main purpose here is just to give you 
a. feel for some of tha problems involved. Be aware of theae 
problems as you construct programs; try to minimize all three 
variables — • compile time, execution time, and requirfBd 
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storage — simultaneously, reallglng that compromleeyp will 
ha nec©©eary« 

, The Intended uses to which a program will be put also 
dictate what additional compromises may ba tiecasaary^ For 
exampl©^ a program that is d^signod to b© run on any computer 
cannot make us© of "short cut" options available on aom© 
computers* Unless a program is definitely intended to do a,, 
specific ^'on© shot'* kind of task, it should b© constructed 
to handle general cases rather than specific casaa. Ganeral 
programs -probably will be longer than specific programs , 



however; and they usually become longer as thay bacom© more 
general • Several compromiaoQ will be neceaaary, therefore, 
as a program is generalissad for broader application to a 
wide range of ^computara and arimilar problems • Furthermore, . 
compile and execution times as well as storage requirements 
for a given program may vary markedly with different jcoroputer 
systems and with different compilers used on the same computer* 

* '~ " - - - - ^ 

Some specifics » 

^ ' ■ - . 

Refer to UNIT 17 AGTIVITtES TABLE. 
Someone else's ideas. 

The following material is reprinted from the Waterloo 
UniverQity News let tar , September, 1970. 

The following is a list of hin<j:8 on how to optimize 
FORTRAN coding In order to achieve better" accuracy in 
culoulations and to increase the spe^d of execution of 
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programs in general,. 

!• Think carefully about the problcsm bofor© 
programing. If^yqu ar© unsur© of th'o 
techniques involved, mak© a point of s^e« 
ing 8o!aaone at t]ti<? Information Desk. In 
particular, make sure your program checks 
out (Sn the following points: ^ 

a) The program does exactly tha job 
you want it to do. 



b) Input and out^mt are in the most 
convenient format. 



c) Today's results will be understand- 
able in six months' time without 
having to re-run the program? 

d) The program structure naturally 
reflects the problem structure* 
thereby being easier to codo aM 
debug. » 

e) The program can easily be extend- 
ed to cope with an extended version 
of the problem. 
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UsQ DOUBLE PRECISION arithmetic in critical calculations 
wherever spac© fallows 

Use a minimum of mlxed-raode arithmetic* Tho extra coding 
generated can^n soma caaos take mor© time to execute 
than the arithmetic Itself. 

Avold^uS ing SUBROirriNES aad TTJWCTIONS for aniall rapeated 
tasks. 

Arrange the program^loglc to avoid branches whenever 

Make the most probable result of all LOGICAL IF statements 

a simple drop through instead of a branch. 

Use LOGICAL IF's instead of ARITHMETIC IF's. 

Choose variable types to avoid conversions (i.e. mixed 

modes) whenever possible. 

Reduce input-o-utput to' th^ minimum necessary. 

Avoid implied DO's in input-output where possible. 

Align all COMMON, ^nd EQUIVALENCE statements with variables 

in decreasing order oft torag^e space" (i.e. .C0MPLEX*16 

before REAL*8 before* v.« LOGICAL*!). 

Calculate all quantities which arts constant through a 

program at the beginning* and calculate all quantities 

constant through a loop outside the loop. 

DO 20 I»-l,450 

a<X+3,'2*I-f:l)*«D<I+2.2*KHE<2*IH-p , * 
20 CONTINUE'. 



should b® written: 



DO 20 J-3,A52 
C(J-M,2AJ-3)«D(J,M)+E(N) > 
20 CONTINUE 

This modification saves 8^8 multiplications and 899 additions 
Store any ARRAY element used more than once, in a loop in a 
temporary SCALAR variable. 

Use as fav? subscripts as possible pn arrays (i.e. use A(720) 
Instead of A(12,6,10) ). 

a) Make all pn-off sVitches, flags, etc. L0GICAL*1. 



'b) Make all test varfables (3-way or more) INTEGER*2. 



J^IMENSJON X (500) 
LOGICAL*! OUTPUT 
READ3, OUTPUT, N 
3 F0RMAT(L1,I5) 



ft 



IF(0UTPUT)PRINT9, (Xd) ,1-1, 




READ3, BRANCH 
3 F0RMAT(I3) 

IF<BRANCH)7,304,82 
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Hare, only 16 bits aro tested In the IF statement, 
whereas the use of a 4-byte integer variable would 
n^cossltat© the testing of 32 bits. 

Use assigned GO TO 'a instead of computed GO TO's. 

a) Us® LOGICAL IP's instead of a-^ay GO TO's. ' 

e.g. Ihefjflcieht ~ "Efficient , 

IF(DOG)14,23,14 IFCDOG.EQ.OGO TO 23 

14 X-X+l X-X+1 



23 X«X-1 23 X-X-l 

y 

Using a logical IF here is more efficient because it 
generates less coding and -executes faster than the 
arithmetic IF. ^ 

b> Use ARITHMETIC IF's Instead of 3-vay GO TO's. 

e.g. Inefficient Efficient 

IF(TEST.EQ.O)GO TO 1 ' IF(TEST)3,1,5 

IF(TEST.GT.O)GO TO 5 3 STOP 

STOP 1 X«X+1 

1 X-X+1 5 PRINT2,X 

5 PRINT2,X 2 FORMAT<F10.3) 

2 FORMAT (FID. 3) 



For the same reasons as in (a), it is more efficient 
to use an arithmetic IF here. 



C"' 
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18. Using IF Qtatomonts to determine conditional branches 
is 1$P0 officiant than using aasigna^ or computed GO 
TO*s, Th© computed GO TO u®©s more overhead time and 
space than the assigned GO but it ©till is better than 
an IF statement. 

19 . Where possible , paBs var^^ SyMgUTIMS _ tto^^ 

COMMON instead of u©ing^ parameter lists; this saves 
much time because addresses do not have to be passed 
down to the subroutine for the variables in the call- 
ing sequence, « 

20. Do not test for equallx/y using floating-point variables, 
because of roundoff error In low-order bits. Use .GE. 
or .LE. 

21. Use SQRT Instead of ^^.5^ since the SQRT routine is 
faster than the logarithms routine used to evaluate^ 
expressions of the form X**R. . . 

22. For small powers, use A*A^A or A**I with I«R instead 
of , A^AR, where R is a floating point integer; values 
raised to integer powers are computed by repetitive multi- 
plications, whereas values raised to real powers are 
computed by using logarithms. 

23. Us© unformatted I/O for scratch units; FORMATS waste time 
, and $pac©. ; 

24. Always^xlebug programs under WATFIV; the compilation time 
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Is faster and th© orror-messagea ar© useful. 
25. Production-typ© jobs (i.e. those iarge-C03e© and time- 
consuming Jobs which ar% run f req<uently without chang- 
ing the sourcfe pr0gram^.,grp©rhap8 with changing only 
one subroutine) should not^ be run under WA1T*IV. Any 
unchanging routines in such programs should be compiled 
into object decks vmder FORTRAN H. Runn|/^g under FOR- 
TRAN H will decrease the execution timg/ 

.SELF EVALUATION: Pages 17.18 - 17,21 contain programs that produce 

the sam© end results y but they vary considerably 
in how they obtain the resists. 

^> Here is the problem to b© solved: make a 
list of the names and ages of all people who are 
between the ages of 17 and 21 and find their 
average age. Assume that you have a set of data 
cards with the following information punched in 
each card: 

Name, columns 1-20 

Social security number-, columns 2*M1 
Age, columns 32-3A, right justified 
Place a blank card at the end of the punched cards 
as a signal that all the data have been processed. 

Examiae both programs very carei^ully and 
determla© what advantages and disadvantages may 
' exist regarding th© efficiency of each program. 

S5G ■ 



Record your observations in the spaces provided* * 
On tha pages following the programs some possible 
observations are recorded so that you can chock 
yourself. If you niadQ observatl on@ that ar6 not 
listed, then discuss tham with your Instructor 
to see whether you are cc^rroct. 

_ _Tl\e programs, were. xuQ Jin MO- 

the execution and compile times and the storage 
requirements of the two programs and harmonize 
them with your observations, if possible. (Your 
observations may be correct regardless.) 

Notice in particular that these programs 
were executed with just a few data cards (actually 
10, 5 of which did not^ qualify for listing). If 
the programs were used with 500 cards, or 50,000 
cards, would your obseirvations still hold? Does 
the number of data cards, in fact, make any dif- 
farence in compile time? In' execution time? In 
storage requiraments? * ^-^^^ 
^ What about the comp^^itability of the two 
programs with the 1130? Just how general are 
the two programs? 

These are some of jthe questions that you 
need to answer m you make your observations. 
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The following pages contain the programs for th© SELF 
EVALUATION section. 
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(, THIS PKUGHAM MAKfcS A I ISF iN^ Qt' PBOp'U wHOSt ^G6S AR£ iti-eo 

C AHO AlSU CALCULAIES THk|H AVtHAGt AGt. 

C 4 ■ 

C * lit * 

C LIST Of VAHiAttlfcS * 

C * ' UATA - AHKAY GONfAiNi.NiG NAMES iN FiRSF * 

^ * ' FiVfc COLUHNS AMU AGES IN COLUMN * 

C * SIX . »< 

5 . ■ KSUM - US to f-UK SUMMING ANU CALCULATING * 

G * AVfcKA&e ^. ♦ - 

C ♦ SUM - RtAL fcUUlVALaMT SUM ♦ 

^ • ♦ N C«UNIfc« fOR NJMat:R OF CARDS REAO ♦ 

^ ♦ K « COLNTER FOR NUMd£R GF NAMtS ON * 

C ♦ TRc LIST " " * 

^ * IM - CAKU RfcADER LUGKAL UNIt NUMlifcR * 

^ ♦LP - LlMt PRUsjTfcR LJGICAL UNIT NUMBER * 

C ♦ • • * - 

C 

INTEGfcU DATA(:>00,6i 

uATA lN»LP/:?,o/ 

CATA N,K,KSUM/3»0/ 

C wkUc HtAUiNGS." 

WR'irt(LH,X) ' . • • 

C PLACE OATA INIO AkRAV, 

RfcAO< lN,^)(OATAn , JJ # J^i,6J 

C — CH6Ci<. FOR LASr CARO. . 

IF iJATAl I tt») .bU.OlGO TO 10 
N^N+l 

90 CCNTINue ' ' 

Q — : ---^ AkkAY fur AulS in the RANGE 

10 OJ 91 I?»1,N ■ 

IF( jATAt 1 ,6 ) .Gl .^0. OK. OATAI I, t,) .LT .itJ)GU TO 91 

C ^^jt^ COUNT f^OK FINDING THt AvERAGt. 

J<«K + 1 . • • 

KSOM«KSUM*UATAU f6) 

WKl rt (LP, iH OATA C 1 , J> , J«l,6» 

91 CCNUNufc 

CHAiMGt iNTtGER SUM Tu REAL FOK CALCULAT XNU AVERAGE. 

• u THtN CALCULATE AVERAGE AND t^UUNU TO NEAREST INTEGER. 

SUM^KSUM 
/SUM^SuM/ 5 
L— WRITE AVERA**E AGb . 
rtRITe(LPt4)K,KSUM 
STOP 

^ ««» *«• ■** •»» <*• W» «*•» «*A 4#* WW «M m» e* « IM» «M «M e«f> «it Mj« «M «M< W» «M «H <M> «M W« ^ AM M» <MW <«M «M> <MU> Mi Ms m m*i 

C ^ FORMAT STATEMENTS. 

i 0 FORMAK/* LIST OF PEOPLE WHCSE AGES ARE ia-20«// 

i * NAME AGE* /) ^ 

<J FURMAT<5A4 ,ilX,B) ^ 

3 FuRMAT(6Xt5A^,3X»I2> *«. 

4 FORMAT {/• THE AVERAGE AGE OF M 5, PEOPLE IS SU,*.*! 

END . • <'Q,9 ^ 




LIST uf PtuPte wHusb Aoes ARC ie-r^o 

f NA Mt AU t • 

HFHhhHHhHHHHHHHHHHHH 18 

iiuiiiiuiiiuniii. ^0 

THfe AVfcRAGt: AGE ^F 5 PfcOPLc IS 19, 

' COrt£ USAGfe - UbJeCT ^ ^73b aVFtStAHHAY. A>KEA« 12000 



Possible ^ood point 8 
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PoQsible bad potntB 



c 


* 




c 




Ll^i Of 


c 




NAMfc. 


t 




SSN 


c 






c 




M 


c 




XN 


c ' 


* 


IN • 




* 


lip 


c 




AyG_. _: 


c" 


♦ 




c 
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C - 
, (, — pKUi^KAM 2 ~ — '■ 

c • 

C THii, PHUbHAf MAKt:5 A LlSrilMu OF PfcUPLH w'HJSfc AGES AK€ id-20 
C Am ALi>U i.ALL\JLAfhi> THEiK AVfcKAUfc AGc, 
C ' 

♦ 

VAftiAbttS . ♦ 

- P£KSUN«S NAME •» 

- PbftSGN'S SUCUC SeCUKlTY MUHBEft ♦ 

- PfeKSUM'S AGE nNTEGEK) * 

- COUNTER fUH NAMES UN iHt tlST *' 

- THE RE At EUUIVALENT Lf N * 

- CARU READER tUGICAt UNIT NUMaCK * 

- LjlNfc PRINTER LOGJCAL UNIT NUMBER ♦ 
_US£D_ PGR SUMMING ANU CALCULATING -♦^ 

AVERAGE ♦ <c 

c • 

1 % iNTtotR AGE ' ^ ' 

2 - ; UiMhNSJUN NAMtUO) , i>SN( ID 

3 DATA lN,tP/5,6/ , AV(^yO,0/,N/0/ 
■ C ^~ PUT liUT HEADINGS. . ■ ' 

^ GU TO IQO 

C — — KEAU OATA CAKC. 
f> 10 KfcA0nNt2)NAMfc, SSN,AG£ ■ , . 

CHECK FUK LAST CARb, AGE iS ZERO UN LAST CARD, 
^ IE IAGfc)2Q,20,ij 

C— UN ENCUUNTEKING IaST CARD, CALCULATE >\V£RAG£. 

7 20 • ' /AV.G*A\yG/Kl . 

fNO AVEKAGE TC NEAREST INTEGER. 
' X AuE==A tfv>-«-0. i> 

' / GC TU iU^ 

C ^ PKUCESS CARD. CHECK FqR AGES IN THE RANGE 18-20. 

10, ii. iF( AGEr2ia i, AO, 10 ' . 

H a IFUoEri?) 10,10,12 

C .„ PQ,^ AVERAGE AND COUNT." 

l<i . 1^ . AVG«AVG + A6E 

13 ■ -N^^N+l 

i<f . GO TU iOi 

C . 

C OUTPUT STATEMENTS. 

C • 

C HE'ACINGS. . 

iOO hRlTE(LP,U 

.10 GU TU 10 . 

' C LInP Of LIST. 

17 ' 101 WRI TEILP i3J NAME, AGE 

1« GU TO 10 > 

C , AVEKAGfc AGE. 

19 102.. WRITeUP,4)N,AG£ 

20 , STOP 

^ ^ ^ 

C FORMAT STATEMENIS. . ' 

C . INPUT. 

21. . 2 FURMATaOA2,UA.l,U) 2/^i 

C OUTPUT. • "^^Z 




2a 
as 



I 0 ^□HMAn/» Ul- PfcUPLfc WHClSt A6£S ARE i8«20«// 

i FUHMAT 10A^#3X, |2» 

4 FORMATi/' The AVfcKAv^t AGfc OF Sl^t* PaOPtfc IS SUf»«M 
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END 



IfcNTHV 

it SI CF PeUPlE WHOSE AGES AKC Att-^O 

NAML , AG£ 

OOJOJUObuUODUUOUOJUi) 20 ' 

. f fff FFf hF*-FFFFFFFFFF 18 

GCUGGGGGGGGGGGGGGGGG A9 , 

HM.^t1HHHHHHHHHhHMHHHH 18 ' 

inn kill I nil I mil - 20 . 

THE AVtRAGE AGt OF 5 PfcOPLh IS 19. • 

» 

CORfc USAGe (jdJfeCT GOUE^ t>560 aYTtStAHKAY AkEA*' 84 8Yr£StTUfAL AB 

cuHPiLt rimfc« ow.<» stc» txfccuriuN TiMe«^. o» i4 seg, watfiv • version i l 



Pogstblq good pplnta 



Poaalble ^^^ ^ 
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Sgiws Observations on Prograia 1 

Good points. 

Line S: lutegar counter used. 

LlnQ© 2 and 3: DATA used for initialising constants rather 



Line 7: Logical IF is faster than arithmetic IF, 

_ _ _ _ _« __\ 

Line 13: Integer arithniet:ic used for summing. 

Lines 13 and 17: Previously used variable KSUM reused, conserv- 
ing storage. 

Line 21: Maximum number of characters stored per storage location 

by using A4 fields. 
Line 17: Good use of mixed mode, 

Bad points, 

\ ■ ■ 

Line 1: using a two-dimensional array makes program less general 



than assignment statements* 



and uses a great deal of ston^e. A large number Of 
cards could not be processed using this program. 



Lines 5 and 10: The two DO loops could be combined into one, 



making the use of a two dimensional array 



unnecessary. 



Line 11: Compound argument in logical IF may be slower than 



two simple logical IF's. 



Lines 11 and 13: A new nonsubscripted variable should be set 



up to replace DATA(I>6) In these statements 



since referencing the subscripted variable 



three times ia tithe consuming* 



Lines 9 and 15: Removal of CONTINUE *q would reduce the number 
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J 

of executable statements. ' 
Program ds not \oinpatabl© with 1130, if that 
matters • * 

f 

Line 8s Counter not needed; in^m of DO should b© used rather 
than separata counter* 
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' Some pbsorvatlons on Program 2 
Good points. 

Organisation of program is convenient, having all output state- 
raents , together. 

Program can handle an unlimited number of data cards. 

Can be used on the 1130 by changing I/O unit numbers in DATA 
statentdnt. 



Linea 7 and 12: Uses AVG for storing both th© sum and the average 



Linm 5 and 17: Program requires a great deal of I/O in the 



reducing the number of variables. 



Line 7: Mixed mode is better than using 



XN«N 

AVG- AVG /XN 



assuming mixed mode capability, of course. 



loop and will probably be l/0,,bbi.und on^'the 



1130. This may not be bad on the 360, however. ' 



The alternative, placing the data into an array. 



may require large amounts of storage.* 



Line 3: DATA statements used for initializing constat^ts. 



Bad points. 



Novel organization requires -e^a^cesalve number of transfer stiate- 



menca. 



V 

him Ui Mixed mode expression in sum is inefficient. ' Besides, 
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the summiag should bo la Integer mode. 
Line 5: The social security number Is never used and 8houldn*t 
be read* 

Lines 2 and 21 t Storage of characters Is not efficient since 

only two character© per storage location are 
used for NAME and only one for SSN, Since, 
however, NAME is Integer and a tnaximum of two 
characters is allowed on the 1130 » this makes 
the program compatable with the 1130. It 
would be better to us© REAL NAME (5) and 5A4 
on both ras^chines. 
Lines 6, 10, and 11: Arithmetic IF slTatement^ are slower than 

logical IF*s for two-way branching; hnt^ 
if coiapat ability with the 1130 is important 
then that is a necessary comproraisa. 
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^ ASSESSMENT TASKS: If you are trying f or ^ "B" In the course, then 

you will be required to construct a Fortran pro- 

^ gram to solve one problem given to you by your , 

instructor. 

If you are trying for an "A," than you will 
be required to construct programs to solve two 
problems given to you by your Instructor. 
In either case, see your instructor* 

WHAT NEXT? You're on your own! 

ENRICHMENT OPPORTUNITIES: If you are so excited about UNIT 17 that 
you would like to work on additional problems, see your i^struc- 



ERIC 



tor. You may wish to work on a pKpject of yo4f,:<xwn,, but get 
the i"nstructor 's approval before ybu do. 

.There ar© more advanced courses which you may wish to take, 
A partial list with a brief description of each course is given 
b©low: 

.COMSC 2123: Intermediate Prograimaing. .More on algorithmic 
problem solving with the computer* Use of 
files. IBM Sy8tem/360 Fortran language ext^n-- 
sions and Job Control Language <JCL)» 

COMSC 3223: Digital Computer Methods. Digital computer 

approximate solutions of algebraic and trans- 
cendental equations, solutions of linear and 
non-linear equations, functional^ approxima-* 
tions* legist squares curVe-f itting and allied 



X7.27 

topics^ PraclUcal progransming expericnc© in 
tho applications of thm& techniques* 

COMSC 3333: Procedures and Algorithmic Proceaaas. Xha 
description and programming of numeric and 
non--numeiric problems. The concept of an 
algorithm, PL/I language « ^ 



See; your instructor if you want additional information. 
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APPENDIX I 

COMPARISONS OF VARIOUS FORTRAN IMPLEMENTATIONS 



y = ym 
n H no 

NR 3 no ruling 




<^racter 0©t ' 




■ - - - 


■■ - — 













y 


y 


y 


y 


y 


y 


* (apostrophe) 


n 


n 


> y 


, y 


y 


y 


atatement continuation 














linm 


19 


5 


5 


19 


19 


5 


aumeirlc statement label 


I 








<> 




(decliDfal digits) 


1 to 5 


1 to 4 


1 to 5 


1 to 5 


1 to 5 


1 to 5 


variable name (characters) 


1 6 


1 to 5 


1 to 6 


1 to 6 


1 to 6 


1 to 5 


data typus 














integer 


y 


y 


y 


y 


y 


y 


r<ial 


y 


y 


y 


y 


y 


y 


double prdcision 


y 


n 


y 


y 


y 


n 


complex 


y 


n 


y 


y 


n 


n 


xogxcax 


y 


n 


y 


y 


n 


n 


Hollerith 


y 


n 


y 


y . 


y 


n 


intagar ranga 


MM 

NR 

• 


m 




±(2'^-.l) 


±-(2^^-l) 


±(2^^-l) 


« 

vmX constant 














basic real constant 


y 


y 


y 


0 y 


y 


y 


real exponent range 


NR 


NR 


±75 


±75 


±75 


-39 to +38 


r«tal single precision 














(# of digits) 


NR 


NR 


7 


7 




7 


Integer constant followed 














by a decimal exponent 


y 


n 




y 


n 


n 


ft 

doul>Xe precision constant 














real double precision 












• 


0 of digits) 


NR 


NR 


16 


16 


16 


10 


. ir©®l constant with 'D' ' 














In place of 'E' 


y 


n ' 


y 


y 


n 


n 


number of array dlmesslpna 


3 


2- 


7 


7 


3 


3 


subscript form given by 














<i{it«$er) oonstant<^arlabla 














± constant 


y 


y 


y 

if* 


y 


y 


y 


. ;^ ^ It 
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, . ,j 






•• . \ - - ■ 




.. 











J — i.^, 



(literal) 



H 

t t 

I 
L 
T 

X 

z 



A format maximum field width 
format (parens levela) 
saala factor - 

blanks in numeric conversion© 
. high-order 
within the f iald 

real converaion^ 

integer plus exponent 
E type exponent 
D type exponent 

format during execution 

statement functions must 
jfrecede the 1st executable 
statement and follow the 
specification statements 

type specification in a 
function statement 

function may define or 
redefine its arguraentQ 

transmit in a CALL 
RoHerith arguments 
external subprogram names 

block data subprograms 

apftcif ication statements 
pirec^de Xb% executable 

SIJEEPISION, COMMON, EQUIVALENCE 
must h^i ord^rcid 

«9ic£:«ir]dii«tl function tmay alter 
variable in pOMMON 

tc^nd tttode arithmetic 
ERiC 
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ft 



/ 



relational exprcisslons 


V 




y 


y 


n 


n 


logianl opatAtoirs 


y 


n 


y 


y 


n 


n 


assigned GO TO 


V 


n 


y 


y 


- y 


n 


logical IF 


V 




J 


y 


n 


n 


DO <iKt Winded ranga 


y 


n 






n 


y 


READ and WRITE 








- - — 






formatted 


y 


y 


y 


y 


y 


y 


unformatted 


y 


y 


y 


y 


'y 


y 


REWIND 


. y 

• 


y 


• 

y 


y 


y 


y 




y 


y 


y 


y 


y ' 


y 


ENDFILE 

• 




V 

J 


V 

J 


y 


• 

y 


y 


formatlted records 














Ist character printed 


n 


n 


n 


' • . » ■, 


n 




space before printing 




• 






blank 1 lina 


y 


n 


y 


,y 


y 


y* 


0 2 lines 


y 


n 


" y 


y 


* y 


y* 


1 Ist lin@. new oao^ 


V 


IX 


y 


■ y X. 


• y 


J* 


+ supprass space 


y 


n 


y 


y 


y 


y* 


adjustable dimension 


y 


n 


y 


y 


n 


n 


common 














blank ^ 


y 


y 


y 


y 


y 

• 


y 


namad 


V 




y 


y 


n 


array sixa declared 

\ 


y 


n 


. y 


y 


y 


y 




y 


n 




y 


• y 


y 


typ© statement 


y 


n 


y 


y 


n 


y 


aimensxon xnxormation 




n 


y 


y 




y 


data statement ' 


i ■ 

y 


n 


y 


y 


y 


y 


format types 














A 


y 


n 


•y 


.y 


y. 


' y. 


D 

B. 

F . 


y 


n 


y 


y 


, y 


n 


y 


y 


y 


y 


y 


y ' 


y 


y 


y 


y 


• y 


y 


G , 


y 


% 


y 


y 


n 




^Applies to line printer 




It 










not console typewrit^jr 


















Si i 
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A^END 



ABSOtUTE AOORHSS 

AN ADDRESS THAT I S PeRMAN€NTlY ASSIGNEO BY THE MACHINE 
OeSlGNGR TO A STORAGE LOCATION, 



- ACCESS TIM6 

TH6 PERIOD OF TIME NeCESSARY TO lOCATB AND TRANSFER THE 
CONTENTS OF A SPECIFI60 MEMORY LOCATION INTO /A\HOR KING REGISTER 
OR, CONVERSELY, TO TRANSFER THE CONTENTS OF AVlfORKlNG REGISTER 
TO A S P EC I F I eo « EMORY LOG A T ION , ^ - 

/ 

ACCUMULATOR 

A REGISTER IN WHICH THE RESULT OF AN ARITHMETIC t)R LOGIC 
OPERATION IS STORED. 



ACN 

ASSOCIATION FOR COMPUTING MACHINERY* 



ACRONYM 

A WORD FOR><E0 FROM THE FIRST LETTER OR LETTERS OF THE 
SUCCESSIVE WORDS OF A MULTIPLE WORD TERM* 



AOAPTtVE SYSTEMS 

SYSTEMS DISPLAYING THE ABILITY tO LEARN, CH/ANGE THEIR STATE, 
OR OTHERWISE REACT TO A STIMULUS* ANY SYSTEM CAPABLE OF 
ADAPTING ITSELF TO CHANGES IN ITS ENVIRONMENT, 



ApORESS . - ■ 

A LABEL SUCH AS AN INTEGER OR OTHER SET OF CHARACTERS 
WHICH IDENTIFIES A LOCATION IN WHlQH INFORMATION I S STORED* 



ADDRESS. INDEXING 

'THE PROCESS OF CHANGING AN AODRE*SS IN A MACHI NE^LANGUAGE 
COMPUTER INSTRUCTION BY ADDITION OF A QUANTITY HaD IN- A 
SUeClAL REGISTER UNDEX REGISTER)* THt S CHANGE IS OO^IE 
AUTCMATICALLY IN THE EXECUTION OF AN .INSTRUCTION. 



ALOOL * « ' 

ALGORITHMIC tA'NGUAGE* A DATA PROCESSING LANGUAGE UTILIZING 
ALGEBRAIC SYMBOLS TO EXPRESS PROBLEM-SOLVING FORMULAE FOR MACHINE 
.SOLUtlON, 
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ALGCRITHM 

A 0E»^ INI T^?^STFP-BY-»STEP 



RULE FOR CONSTRUCTING THE 



TO A PROt^eM OR FOR FVALUATING A FUNCTION. ALGORITHMS 
LHAO TO r SOLUTION 



PROij^l 

TO r ! 

MAlfr Be LONG OR 



IF ONE IS POSSia^E, ALTHOUGH TIME 
SHO^T. see "HEURISTIC." 



SOI.UTION 
USUALLY 
REQUIR60. 



ALPHAMERIC 

ALSO ALPHANUMERIC PERTAINING TO A 
CONTAINS ROTH LETTERS AND NUMERALS, AND 



CHARACTER SET THAT 
USUALLY OTHER CHARACTERS. 




ALPHABETICALLY fPlENTED MACHINES 

COMPUTERS HA VJl NO INSTRUCTIONS AND MEfORIES .ORGAN! ZEO 
ESPECIALLY to MANIPULATE ALPHABETIC CHARACTERS C INCLUDING 
NUMERALS!. 

\ . • ■ 

ANALOGUE 

THE USE OF PHYSICAL VARIABLES, SUCH AS DISTANCE OR ROTATION 
OR VOLTAGE, TO REPRESENT AND CORRESPOND W| TH NUMERICAL VARIj^BLES 
THAT OCCUR IN A COMPUTATION! CONTRASTED WIT»^ "DIGITAL."' 

ANALOG COMPUTER 

A COMPUTER WHICH REPRESENTS NUMERICAL QUANTITIES AS 
ELECTRICAL AND PHYSICAl, VARIABLES. 

ANALYSIS 

A SEPARATING OR BREAK ING-UP OF A WHOLE INTO ITS PARTS'* SO AS 
TO FIND OUT THEIR NATURE, PROPORTION, FUNCTION, RELATIONSHIP, 
ETC. 



APPLICATIONS PROGRAMMING 

THE PREPARATION OF PROGRAMS FOR APPLICATISN TO SPECIFIC 
PRCBLEM^ IN ORDER TO FIND SOLUTIONS; CONTRASTED WITH «*SYSTFMS 
PROGRAMMING." 



ARRAY . ' 

^ A SERIES Of ITEMS ARRANGED IN AN ORDERED, MEANINGFUL 
PATTERN. 



ARITHMETIC UNIT ' . f , 

THE UNIT OF 4! C^OMPUTING SYSTEM THAT CONTAINS THE CIRCUITS 
THAT PERFORM ARITHMETIC OPERATIONS. * , 

ARTIFICIAL INTELtlGENCE 

REFERS TO THE PERFORMANCE BY A COMPUTiIr OF TASKS THAT HAVE 
HITHEBJO REQUIR&O THE APPLICATION OF f»UMAN INTELL IGBNCE • 
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ASSCMBtC 

TO PREPARE A MACH|NeH,AN6UA66 PROGRAM fROM A SYMBOl^IC , 
PaOQRAM BY SilBSTITUTING MACHINE COOf S FOR SYMBOLIC CODeS*""^ 



ASSEMBLER 

ALSO ASSEMBCY PROGRAM A COMPUTER PROGRAM THAT OPERATES ON A 
SYMQOLIC LANGUl^OE AS INPUT DATA TO PRODUCE MAC H I Nfe LANGUAGE 
INSTRUCTIONS WHICU CAN BE PROCESSED OIRE^LY BY THE COMPUTER. 



__A5_s'eMe.Lils. . - : ' 

COLLECTIONS OF PARTS INTO UNITS BY RCLATfNG EACH PART TO ALL 
OTHERS IN THE UNIT ACCORDING TO SOME^ PLAN. ^ 



ASSEMBLER LANGUAGE 

SEE ASSEMBLY LANGUAGE. 



ASSEMBLY LANGUAGE 

JHE SYMBOLIC LANGUAGE WHICH IS THE INPUT TO AN ASSEMBLY 
PROGRAM* . ' . 

^ASSOCIATIVE MEMORY 

A COMPUTER MEMORY IN WHICH. INFORMATION IS LOCATED BY THE 
CONTENT 6f SOME PARTiJF THE MEMORY. A "TAG" MIGHT BE ATTACHED 
TO ^ACH ITEM OF INFOIpATION T(5' IDENTIFY IT. SVNONOMOUS V^I TH 

"CONTENT-AOORESSABLE Memory." * , , 



AUTOMATIC COMPUTER 

SEE "COMPUTER." 



AUXILIARY (PERIPHERAL! EQUIPMENT . , 

EQUIPMENT NPT ACTIVELY INVOLVED DURING THE PROCESSING OF 
DATAt SUCH AS INPUT/OU^UT. EQUI PME NT AND AUXI LI ARY STORAGE - * 
UTILIZING PU**ICHEO CARDS, MAGNETIC TAPES, DISKS OR DRUMS. • 

.BCD ' /* , ■ ♦ . • ■ ' "■ .. ' r ■ 

: SEE QINAR.Y COOEO OECIMAt. ' 

" . • .... 

BUG' ' - - ' 

ANY MECHANICAL, ELECTRICAL, ELECTRONIC, OR PROGRAMMING 
DEFECT -Tf^AT INTERFERES WITH THE OPERATION OTF THE COMPUTER OR THF 
SUCCES^FJJL .RUNNING OF A. PROGRAM. USED SYNONYMOUSLY W ITH ERRCJl AND 
PALFUNCTTdN. . . 
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BtpCK 

. A COtLECTICN OH GROUP OF WORDS, KECOROS, OR CHARACTERS WHICH 
AR6 HANDLED AS A SINGLE UNIT, ESPECIALLY WITH REFERENCE TO INPUT 
ANO OUTPUT. A FILE STORAGE BLOCK IS OFTEN CALLED A PHYSICAL 
RECORD, ALSO, THE SET OF LOCATIONS OR TAPE POSITIONS IN WHICH A 
BLOCK OF WORDS, AS DEFINED ABOVE, IS STORED OR RECORDED* 



eLOCK DIAGRAM 

A DIAGRAM OjF A SYSTEM, INSTRUMEf^T, COMPUTER OR PROGRAM 
IN WHICH SELECTED PORTIONS ARE REPRESENTED BY ANNOTATED BOXES 
ANO INTERCONNECTING LINES* 



BOOLEAN ALGEBR^^ ^ 

THE SCIENCE OF SYMBOLS DENOTING LOGICAL PROPOSITIONS ANO 
JHEIR COMBINATIONS ACCORDING TO CERTAIN RULES WHICH CORRESPOND 
TO THE LAWS OF LOGIC. NAMED AFTER THE ENGLISH MATHEMATICIAN 
GEORGE BOOLE CI 815- 1864 K 



BRANCH CNOUN) . 

A SEQUENCE OP INSTRUCTIONS EXECUTED AS A RESULT OF A 
DECISION INSTRUCTION, 
^ BRANCH ( VERB) 

TO DEPART FROM THE USUAL SEQUENCE OF EXECUTING I NSTRUC TI ONS ' 
IN A COMPUTER; SYNONYMOUS WITH JUMP OR TRANSFER* 



BINARY 

1. THE NUMBER REPRESENTATION SYSTEM WITH BASE OF TWO. 
.2. A CHARACTERISTIC OR PROPERTY INVOLVING A SELECTION, 
CHCICE OR CONDITION IN WHICH;THERE ARE ONLY TWO PO^BlBI LI TI ES. 



BINARY MACHINES 

DIGITAL COMPUTERS IN* WHICK f^lUMBERS ARE REPRESENTED IN THE 

BINARY (BASE 2) NUMBER SYSTEM. INFORMATION OTHER THAN NUMERIC 

IS ALSO REPRESENTED AS COMBINATIONS OF ^BITS." 



BINARY COOED DECIMAL 

A TYPE OF NOTATION IN WHldCH EACH DECIMAL DIGIT IS IDENTIFIED 
BY A GROUP OF BINARY ONES ANO ZEROS, 



BRANCHING 

THE ACT OF EXECUTING A CONDITIONAL CHANGE OF ADDRESS. 
■BA^e ADDRESS ' ' 

. ..A GIVEN ADORES'S FROM WHICH AN ABSOLUTE ADDRESS IS DERIVES BY 
COMB I'MATION WITH A RELATIVE ADDRESS. ' ' 
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BATCH PROCESSING 

A SYSTEM APPROACH TO PROCESSING WHERE SIMILAR INPUT ITEMS 
ARE GROUPED FOR PROCESS I NG' OUR I NO THE MACHINE RUN* 

BOOTSTRAP 

A TECHNIQUig OR DEVICE DESIGNED TO BRING ITSEtF INTO A 
DESIRED STATE ^Y MEANS OF ITS OWN ACTION* E.G., A MACHINE 
ROUTINE WHOSE FIRST FEW INSTRUCTIONS ARE SUFFICIENT TO BRING THE 
REST OF ITSELF INTO THE COMPUTER FROM AN INPJJT DEVICE^ 

_ - _ ^ ' ' * _ _ _ 

THE MOST BASIC UNIT OF INFORMATION, REPR6S ENT ING A CHOICE 
BETWEEN TWO ALTERNATIVES, THAT CAN BE STORED OR HANDLED* A 
BINARY DIGIT? A ONE ID OR ZEROIO), OR THE ELECTRICAL, MECHANICAL 
MAGNETIC, OR CHEMICAL REPRESENTATION OF EITHER IN AN AUTOMATIC 
COMPUTER. 

BUFFER 

A TEMPORARY STORAGE DEVICE USED TO COMPENSATE FOR A. ^ 
DIFFERENCE IN THE SPEED bF DATA FLOW OR THE OCCURRENCE OF EVENTS 
WHEN DATA" IS BEING MOVED FRCW ONE DEVICE TO ANOTHER. 



BYTE * .\ 

A CONTIGUOUS SET OF BINARY DIGITS OPERAfeO UPON-^S A UNIT, 

CACM 

COMMUNICATIONS OF' THE ASSOCIATION FOR COMPUTING MACHINERY. 

CALL 

, THE TRANSFERRING OF CONTROL TO A sVeCIFIED CLOSED 

SUBROUTINE, 

4» • 

' * '* 

CARD HOPPER 

A DEVICE THAT HOLDS CARDS AND MAKES THEM AVAILABLE TO A CARD 
FEED MECHmSM. SYNONYMOUS WITH INPUT MAGAZINE. CONTRAST WITH 
CARD STACKEI^. 

• , , - 

CARD IMAGE . . 

A ONE-TO-ONE REPRESENTATION 0^ THE CONTENTS OF A PUNCHED 
CAsRO, E.G. »• A CARD IMAGE ON MAGNETIC TAPE. C 

CARD READER ' 

A DEVICE WHICH SENSES AND TRAN-SLATES INTO INTERNAL FORM THE 
HOLES IN PUNCHED CARDS. \ 




COMSC OLOSSARY 
PAG6 6 



CARD STACKER 

AN OUTPUT Device THAT ACCUMOLATgS CARDS IN A DECK* CONTRAST 
WITH CARD HOPPeR# 



CARDS TO TAPE . ' 

PERTAINING TO EOUIPMENt OR METHODS THAT TRANSMIT DATA FROM 
PUNCHED CARDS TO MAGNETIC TAPE* 

CARRIAGE RETURN 

THE OPERATI ON T^AT CAUSES TW6 W6XT CHARACTER TO 66-PRiNTED 

AT THE LEFT MARGIN, , 

CATALOG 

THE DATA $ET CONTAINING THE NAMES AND VOLUME IDENTIFICATION 
OF ^ELECTED DATA SETS, USED BY THE SYSTEM TO LOCA^^E DATA SETS 
SPECIFIED BY NAME ONLY. 



CELL ' 

A STORAGE CELL OF I isiNARY DIGIT CAPACITY, E.G;, i SINaE 
6IT REGISTfeR, 



CHANNEL " 

A PATH ALONG WHICH SI GNAL S. CAN .BE SENT, E,G«, DATA CHANNEL* 
OUTPUT CHANNEL, 



CHARACTER SET ^ \^ 

A LIST OF CHARACTERS ACCEPTABLE FOR CODING TO A SPECIFIC 
COMPUTER OR INPUT/OUTPUT DEVICE,' 



CHECK BIT 

A ^INARY CHECK DIGIT, OFTEN A PARITY BIT, 



CHECK DIGIT 

ONE OR MORE DIGITS CARRIED IN -A SYMBOL OR A WORD' DEPENDENT 
UPON THE REMAINING DIGITS IN SUCH A FASHION THAT IF A SINGLE 
ERROR OCCURS EXCLUDING COMPENSATING ERRORS, THE ERROR WILL BE 
REPORTED. 



CLCSED SUBROUTINE / ? * 

' " A SUBROUTINE THAT CAN BE STORED AT 'CNE PLACE AND CAN BE * 

CONNECTED TO A ROUTINE BY LINICAGES'AT ONE Of^ MORE LOCATIONS, ^ 
CONTRAST WITH OPEN SUBROUTINE, 
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COOE ; .'• ^ 

'I A SYSTEM OF SYMBOLS FOR RfiPReSENTtNG DATA OR INSTRUCTIONS 
IN A COMPUteR OR A TABULATING MACHINE OA, 2 TO MRl TE A PROGRAM OR 
PART OF' A PROGRAM FOR THE SpLUTION OF A PROBLEM BY A COMPUTER. 

COLD START 

NO PROGRAMS STORED ON SPOOL P^CK. 



tOLLAT ING SEQUENCE 

THE SEQUENCE INTO WHICH THE AtLOWABtfe CHARACTERS OF A 
COMPUTER ARE RANKED OR ORDERED* ' ' - 



COLUMN 

• I A VERTICAL ARRANGEMENT OF CHARACTERS OR OTHER EXPRESSIONS, 
OR 2 LGOSEIY, A DIGIT PLACE, . 



COLUMN BINARY • . - ^ 

PERTAINING TO TKE BINARY REPRESENTATION OF 'OATA DN PUNCHED 
CARDS JN WHICH ADJACENT POSITIONS IN A COLUrMN COaRESPOND TO ' 
ADJACENT BITS, OF DATA, E*Ge, EACH COLUMN IN A 12-ROW CARD HAY BE 
USED TO REPRESENT. 12 CONSEqUTIVE BITS OF A 36-6 IT- WORD. • ' 



COMMAND 

A CONTROL SIGNAL,. 



COMPILE ^ ' ' - ; 

TO PREPARE A MACHINE LANGUAGE PROGRAM. FROM A COMPUTER 
PROGRAM WR I TTEN IN ANOTHER PROGRAMMING LANGUAGE. 



CC^TROL CHARACTER o 

A CHARACTER WHOSE OCCURRENCE IN A" PARTICULAR CONTEXT 
INITIATES, MODIFIES, OR/STOPS A CONTROL OPERATION, E.G«, A 
CHARACTER TO CONTROL CARRIAGE RETURN, 



CONTROL FIELD 

A CONSTANT LOCATION WHERE INFORMATION FOR CONTROL PURPOSES 
IS PLACED^. . ' 

Control nUNiT ' ' 

THE PORTION OF A COMPUTER WHICH DIRECTS THE SEQUENCE OF 
OPERATIONSf INTERPRETS THE COOED INSTRUCTIONS', AND INITIATES THE 
fiROPER .COMMANDS TO THE COMPUTER 'CIRCUITS PREPARATORY TQ, 
EXECUTION, ► • ' r** , ' . 

. • ■ . • „ ■ "i" 
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CONVKKSATIONAIL MOOe . / 

A MODE Of: COMPUTfiR ppeRATIQN mBHB TWO-HAY COMMUNICATION IS 
(MAINTAINED B^TWCei^ tHE USER AND THE MACHiNg, AS OPPOSEO TO A TYPE 
Of PROCESSING WHERE THE COMPUTgR IS TOLO IN AOVANCE PRECISEtY 
HHAT IS TQ BE DdNE. 

N CpNVERT . ' ' " 

T.O CHANGE THE REPRESENTATION Of DATA fROM ONE fORM TO 
ANOTHERt E.G., TO CHANGE NUMERICAL 0ATA fROt* BINARY TO DECIMAL OR 
TRANSI^ER INfORMAT JON FROM CARDS TO TAPE,.' 

CENTRAL PROCESSING UNIT ICPUl 

THE UNIT OF A COMPUTING SYSTEM THAT CONTAINS THE CIRCUITS 
THAT CALCULATE AND PERFORM LOGIC OECISICNS BASED ON A MAN-MAOE 
PROGRAM OF OPERATING INSTRUCTIONS. 

<HARAC TER , 

ONE Of A SET OF ELEMENTARY SYMBOLS ACCEPTABLE TO A OATA 
PBOC€SSING SYSTEM FOR READING^J^RIT ING, OR STORING, ' . V 

CHARACTER RECOGNITION . - • 

THE TECHNIQUE OF READING, IDENTIFYING AND ENC-^PING A 
PRINTED CHARACTER BY OPTICAL MEANS. ' ' '4 ' ' /• 

' " . - ; ■" ■ ■ ■ ;■- - '■. 

CITATION I NOEX ^ " ^ 

AN INDEX USING FOOTNOTE REFERENCES IN O.GCUMENT^S . AS COUPLING 
MECHANI!^MS AMONG REL AT Et) P AP ER S . USED PARTlCUtARLY IN LAW, E-G^ • 
SHPPARO'S CITATIONS. 

CLEAR • - 

TO PUT A STORAGE Of?. MEMORY DEVICE INTO A STATE DENOTING' ' ' 
ZERO OR BLANK. 

CL0SE.0-SHOP OPERATION 

•'THAT MODE OF OPERATING A COMPUTING CENTER IN WHICH AtL 
MACHINE .OPERATION IS DONE BY. MEMBERS OF A SPFCIALIZED GROUP. 
WHOSE ONLY PROFESSIONAL. CONCERN IS THE CONTROL AND MANIPULATION 
OF COMPUTERS. SEE "OP EN- SHOP PROGRAMMI NG .« 

coeoL"* ' . / 

COMMON BUSINESS ORIENTED LANGUAGE* A DATA PROCESSING 
LANGUAGE THAT RESEM8t6S BUSINESS ENGLISH. 

I* ^ 

« ^ ^ ^ \ 

Coding - . , • " ^ ^ - . 

tME ACT - OF !|:5PECIFYING h PROBt EM-SOLV ING PROCFOUftE BY A 

j56QueNCE of^ Instructions for the operations to &e performed by 

• ^ - . 



THE COMJ^UTER* SUCH INSTRUCTIONS MAY B6 IN MACHINE tANGUAGe 
OR MAY Be COMPILED INTO MACHINE tANGUAG6« SgH "PROGRAHrtl NG» « 



COLtATQR • - . 

A OeVfCE TO COLLATE OR MERGE SET^ Or^ CARDS INTO A NEW 
SEQUENCE- 



COMMAND LANGUAGE 

A LANGUAGE 8Y MEANS OF WHJCH CONTROL IS EXERCISED OVER A 
COMPLE X SYSTEM OF E^UI^MENT ^NO 4?R0GRAMS» SEE »*EXECUT IVE 
SYSTEMS ^ 



COMPILER 

A PROGRAM ENABLING THE COMPUTER FOR WHICH IT IS 
Of SIGNED TO ACCEPT PROGRAMS IN PROCEDURE-ORIENTED OR PROBLEM- 
ORIENTEO LANGUAGE AND TO TRANSFORM THEM INTO MACHINE-LANGUAGE 
PROGRAMS. 



COMPILING . - • — H 

THE PROCESS OF TRANSFORMING A PROGRAM IN A SOURCE 
LANGUAGE INTO A PROGRAM IN MACHINE LANGUAGE. 



COMPUTER . ' . ■ .'W y 

Any MACHINE CAPABLE OF ACC€PT ING. INFORMATION, PERFORMING ^ 
NUMERICAL AND LOGICAL MANIPULATIONS, AND 01 SPLAY 1[ NO THE RESULTS;' 
AN AUTOMATIC COMPUTER IS ONE WHI,CH PfRFORWS SEQUENCE S 'OF OPERA- 
TIONS ON THE BASIS OFjNITIALtY STORED INSTRUCTIONS. THROUGHOUT 
THIS REPQRtt "COMPUTER" TS ALWAYS USED IN THE SPECIAL SENSE OF 
**0 1 G IT AL COMPUTER." SEE "DIGITAL COMPUTER." 

CONSOL E . * 

THE UNIT OF EQUIPMENT US EO'^FOTr COMMUNICATION BETWEEN THE 
OPERATOR. OR SERVICE ENGINEER AND THE COMPUTER. 

« 

CONTENT-ADDRESSABLE MEMORY- 

A COMPUTER MEMORY IN WHICH INFORMATION IS L0CATE6:BY .THE 
CONTENT OP SOME PART OF THE MEMORY. FOR EXAMPLE* 3UCH A ' 
MEMORY MIGHT CONTAIN A TABLE OF THE NAMES, OF QUANTITIES TOGETHER 
WITH- ADDRESSES, SPECIFYING WHERE THE VALUES OF THESE QUAj^TITIES 
ARE TO BE FOUND. SEE "ASSOCIATIVE MEMORY," 



* • . * 



A FORM OF MAGNETIC 'ST0B?G6 THAT PERMITS HIGH-SPEED ACCESS 
TO I NFd4^MAT I ON WITH ]^NTHfe COMPUTER* SEE MAGNETIC CORE. . _ 



COMSC. aOSSARY 
PAGE 10 



COUPLING * - . • 

AN INTgRACTION BETMEEN SYSTEMS OR BeTWEEN PROPfRTIHS Of A 
SYSTEM^ 



CRITICAL PATH METHOD 

A *^AN4G)EMHNT-C0NTR0t TOOL FOR EVALUATING A SEQUENCED PLAN 
FOR ACHIEVING AN OBJECTIVE^ EMPHASIS IS PLACCO ON THE "CRITICAL 
PATH« WHICH is THAT SEQUENCE WHICH ACTS AS A BOTTLENECK AND 
DELIMITS THE OPPORTUNITY TO ACHIEVE THE OBJECTIVE. SEE «PERT*" 



CRYOGENIC DEVICE ' 

ANY DEVICE CAPABLE OF HIGH-SPEED SWITCHING»BY VIRTUE OF 
SUPERCONDUCTIVITY AND VERY LOW THERMAL NOISE AT TEMPERATURES NEAR 
ABSOLUTE ZERO. 



CRYOTRON 

AN ELECTRIC-SWITCHING AND BINARY MEMORY- STORAGE DEVICE 
UTILIZING THE FACT THAT A MAGNETIC FIELD CAN CAUSE A SUPERCON- 
DUCTING^ ELEMENT TO BE IN EITHER A ^TATE OF LOW 0^ HIGH 
RESISTANCE. \ 



CYBERNETICS . ^ 

TKE THEORY OF CONTROL AND COMMUNICAT ION T N THE MACHINE ' 
. AND THE ANIWAL. 

•> oaIc'i ' ■ 

direct access device initiation. :* 

DATA CELL ^ * \ 

THE STORAGE FOR ONE UNIT OF INFORMATION, USUALLY ONE 
CHARACTER OR ONE WORD. ' . 



/ 



DATA DEFINI TION * ^ 

A JOB CONTROL STATEMENT THAT OfSCRIBES A DATA SET' ASSOCIATED 
WITH A PARTICULAR JOB STEP. „ ' 

- 

DATA CONTROL BLOCK, A SYSTEM CONTROL BLOCK TH«.b-UGH%fCNATHE 
INFORMATION REQUIRED BV ACCESS f«JUTl]>JES TO S TOR g;^i?'#;T.I^|«. DATA 
IS COMMUNfCATEO TO THEM, -* ..^i^^^-^' 

. .DATA EXTENOeO BINARY, C^OfeEO DEfrMAL I NTERCH<>IG^ . CDOe. 

f " r,^- r ■ . ' , ■■ y '•'^ ■-l 

-•■ . •' ■ ■ ■•■.^■•i.-'....:-. V,;--- . ■' ■■• 



« 



^ ^ . 
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oecK 

A COLL 6CT ION OF PUNCHED CARDS* 



DECOLLATOR 

A DEVICE USED FOR THE AUTOMATIC REMOVAL OF CARBON PAPER FROM 
PRINTED FORMS, ^ 



DELIMITER 

A FLAG THAT SEPARATES AND ORGANIZES ITEMS OF DATA* 
SYNONYMOUS WIT^ SEPARATOR, 

I ' 

DIGIT 

A CHARACTER USED TO REPRESENT ONE OF THE NON-NEQsATI VE 
INTEGERS SMALLER THAN THE RADIX, E.G., IN DECIMAL NOTATION, ONE 
OF THE CHARACTERS 0 TO 9. . 



DISPLAY 

A VISUAL PRESENTATION OF DATA. 

DUMMY 

P^TAINING TO THE CHARACTER I STJ C OF HAVING THE APPEARANCE OF 
A SPeCiflEO THING BUT NOT HAVING THE CAPACITY TO FUNCTION* AS , 
SUCH. * 

•DATA PROCESSING SYSTEM 

> i NETWORK OF MACHTnTXOMPONENTS CAPABLE OF ACCEPTING 
INFOjRM*ATlON, ^PROCESSING IT ACCORDING TO MAN-MADE INSTRUCTIONS, . 
AND PRODUCING THE COMPUTED RESULTS. > 



DEBUGGING^ 

' the) PROCESS OF ISOLATING AND« liEMOVING MALFUNCTIONS FROM A 
COMPUmR^OR FROM A C0MPUYE{R PROGRAM? A PROCEDURE TO ESTABLISH 
PROGRICm ACCURACY BY RUNNING THE PROGRAM WITH SELECTIVE DATA TO 
FlfjO. LOGICAL OR CLERICAL n^UGS" OR ERRORS. ^ 

i : . f • ^ . • ^ .. 

'DEBUGGING SYSTEMS ' ' 

PROGRAMS OR OTHER SYSTEMS WHICH ASSIST THE PROGRAMMER IN 
DETECTING AND CORRECTING ERRORS. SEE «0ESU6GING*" 

% •' ■ ,. ■ ' 



•.;.Ci:JA0«lO$T.iC/'P*^,OGRlftMS -„ ' . - - • 

■^;>::CarJiP^ THE DETECTION AND ISOLATION OF 
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OIGITAL 

THE QUAtlTY OF USING NUMBeRS OPkCSSE^O IN DIGITS AND IN 'A 
SCA16 0F NOTATION* 

OIGITAL COMPUTER h . 

A COMPUTCR THAT PeRFQRHS MATHEMATICAL AND LOGICAL OPERATIONS 
WITH INFORMATION. N^^ERICAL OR OTHgRWiSEt REPReSENT^D IN DIGITAL 
PORM, 



DIGITAL DATA . 

INPDRMATIQN EXPRESSED IN DISCRETE SYMBOLS 



DIGIT! lER ' • 

A DEVICE TO CONVERT INFORMATION FROM ANALOGUF FORM TO 
DIGITAL FORM, * * 

DIODE ' - , ^ ^ 

AN ELECTRONIC DEVICE USED TO PERMIT CURRENT FLOW I N OWE 
DIRECTION A^JO TO INHIBIT CURRENT FLOW IN THE OPPOSITE DIRECTION, 

« 

DIRECT ACCESS 

SEE RANDOM ACCESS • 

DISK STORAGE . . ^ 

A METHOD OF STORING INFORMATION IN COOEt MAGNETICALLY, IN 
QUICKLY ACCESSIBLE . SEGMENTS ON FLAT ROTATING DISKS. 

DOWNTIME ' . - ^ 

THE ELAPSED TIME WfHEN A COMPUTER IS NOT OPERATING CORRECTLY 
BeCAUSE OF- MACHINE OR ^ROGRAM MALFUNCT ION < 

OROM** STORAGE /, . " \ 

. 'A METHOOT OF STORING INFORMATION IN CODE, MAGNET\sCALLY t ON 
THE* SURFACE OF A ROTATING CYL4NDER, 

' •• ■ ■ • - . 

TO COPY THE CONTENTS OF, ALL OR PART Of A STORAGE, USUALLY 
FROM A CENTRAL PROCESSING UNIT INTO AN EXTERNAL STORAGE.' 



EBCDIC ' \ • ' /' 

EXTENDED BCD INT6RCHANGE CODE* THE PRIMARY CHARACTER ^$ET 
USEO*BY THE 360. . . 
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■■. / 

EOIT ' 

TO MODIFY THE FORH OR FORMAT OF DATA* E.G.t TO INSERT OR 
DELETE CHARACTERS SUCH AS PApE NUMBERS OR OECIMAL POINTS* 

ENTRY POINT - " 

IN A ROUTINE, ANY PLACE TO WHICH CONTROL CAN BE PASSED* 



ELECTRONIC RECORDING AND MACHINE ACCOUNTING 

A SYSTEM OEVELOI^D AT STANFORD RESEARCH INSTITUTE WHICH 
£S TA6L I SHEO THE FEA SIB I LI TV OF MAGNET IC-INK CHARACT ER « 6C0GN IT TON 
AND THE USE OF COMPUTERS IN BANKING INSTITUTIONS WHERE THEY ^ 
PERFORM ALL ROUTINE BOOKKEEPING FUNCTIONS FOR CHECKING ACCOUNTS. 

EXECUTE 

TO PERFORM A DATA PROCESSING ROUTINE OR PROGRAM, BASED 
ON MACHINE-SLANGUAGE INSTRUCTIONS, 

EXECUTIVE SYSTEMS' ^'^ ^ " ' 

SYSTEMS OF COMPUTE^xfROGRAMS DESIGNED TO PROCESS AND TO 
CONTROL THE EXECUTION OF CjTHER PROGRAMS. 

EXTRAPOLATION 

AN ESTIMATE OR INFERE^tpE OF A VALUE BEYOND THE KNOWN RANC 
FROM WHICH* THE ESTIMATED VALUE IS ASSUMED. TO FOLLOW. 



FIELD - V 

IN A RECORD, A SPECIFIED AREA USED FOR A PARTICULAR CATEGORY 
OF DATA, E.G., A.\GR0UP OF CARD COLUMNS OR A SET OF BIT LOCATIONS 
IN A COMPUTER WORD. 



FIXED POINT 

PERTAINING TO A NUMERATION SYSTEM IN WHICH THE POSITION OF 
THE POINT IS FIXED MITH RESPECT TO'ONE END 'OF THE .NUMERALS, . 
ACCORDING TO SOME CONVENTION, 



FLAG . . ' • 

1 ANY OF VARIOUS TYPES OF INDICATORS USED FOR 
IDENTIFICATION, OR 2 A CHARACTER THAT SIGNALS TtiE OCCURRENCE OF 
SOMf CONDITION. . , " ' ' • ' 

FOflfMAT . 

FORM, USUALLY REFERRI NG .,T0 THE ARRANGEMENT* OF -INPUT OR 
output DATA OR LIN&S OF PRINT\'SEE FORM^T^STATEMENTS IN LANGUAGE 
MANUALS. t . • 
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FERR!TES . « 

A CLASS OF N0N-M6 TALHC SUSSTANCCS CONTAI N! Ng' I RON, OXYGENt 
AND OTHER METALS^ THESE HATERIALSn HAVE FfiRROMAGNETIC PROPERTIES 
ANO ARE POOR CONDUCTORS OF EtpCTRICITY. THIS MAKES THEM USEFUL 
Iti MAf»iY APPLICATIONS WHERE ORDINARY FERROMAGNE TIC" MATERIALS (. 
fWHICH ARE GOOD ELECTRICAL CONOUCTDRS) if OUL 0 QAUSE TOO MUCH LOSS 
OF ELECTRICAL ENERGY, * ^ A . 

' I 



FILE 

A COLLECTION OF RELATED RECORDS? E.G,, IN INVENTORY 
CONTROL, ONE LINE OF AN INVOICE FORMS AN ITEM, A COMPLETE 
INVOICE FORMS A RECQRO, AND THE COMPLETE SET OF SUCH RECORDS 
FOR^S A FILE. ^ - v 

FILE MAINTENANCE , \ 

THC PROCESSING OF INFORMATION IN A FILE TO KEEP I t UP TO 
DATE. * • \ 



.1 



EL IP-FLOP - ^ 

A CmCUIT OR DEVICE CONTAININO ACTIVE ELEMENTS CAPABLE'OF. 
ASSliMiNG EITHER ONE OF^'* TWO STABLE /STATES' AT A GIVEN TIME. ' 

FLCATING-^POINT ARITHMETIC - 

A TECHNIQUE PERMITTING ARITHMETIC OPERATION ON NUMBERS IN 
WHICH THE LOCATIONS OF THE DECIMAL POINTS ARE NOT UNIFORM. ' 

*j ' • . 

FLOW CHART ^ » ' 

A DIAGRAMMATIC REPRESENTATION OF THE SEQUENCE OF CHOICES * 
ANO ACTIONS IN A COMPLICATED ACTIVITY. ' 



fqrHal ' . - - 

MECHANICAL, METHODICAL, OR OET ERM IN 1ST IC IN CHARACTER. • 

FCtfVAL LANGUAGE ^ , ' 

I A SYSTEM CONSISTING OF A WELL-DEFINED, USUALLY FINITE, SET 
OF Q^AftACTERS ANO RULE.S FOR COMBINING CHARACTE^^ITH ONE ANOTHER 
T0| FORM-WORDS OR OTHER EXPRESS IONS BUT WITHOUT ASSIGNMENT OF 
pANENT MEANING TO SUCH WORDS OR EXPRESSIONS. ' 

FcIrT^AN 

I FORMULA TRANSLATING SYSTEM* A DATA PROCESS ING L ANGUAGE 
TljjAT CLOSELY RESEMBLES ALQEBRA,IC NOTATION* . ^ 



NERATE , " 

to produce a program by selection of 'subsets f rtom a set of 
Skeletal coding unoer the control of parameters.' 
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GENERAL-PURPOSE 

BHING APPUCAetE TO A HIDE VARIETY OF USES WITHOUT * 
ESSeNTIAl MODIFICATION^ CONTRASTED WITH "SPECl AL-- PURPOSE a « 

HA5P . ' * 

HOUSTON AUXILARV SPOOLING PRIORITY, A JOB SCHEDULING 
•PROGRAM. • . 



) 



HOLLERITH CODE 

AN ALPHA-NUMERIC PUNCHED-CARD CODE INVENTED BY OR. HERMAN 
HOLLERITH IN 1989* IN WHICH- THE TOP THREE POS IT lOMS IN A COLUMN 
ARE CALLED ZONE PUNCHES 12, 11, AND 0 FRON THE TOP DOWNWARD, AND^ 
ARE C0M81NE0 WIVh THE REMAINW^G DIGIT PUNCHES 1 THROUGH 9 TO 
.REPRESENT ALPHABETIC NUMERIC,' AND SPECIAL CHARACTERS, 

.*""•'■ • '• * ■ 

. «, ■ t 

HARC COPY . ' ' . ■ 

. , A- PRINTEO COPY OF MACHINE OUTPUT, E»G., PRINTEO REPORTS, 
LISTINGS, DOCUMENT^,- ETC, . ' 

.,<«*. ■. 

' HARDWAR'E X ' 

./THE flECHANICAL, MAGNETIC,, ELECTRICAL, AND ELECTRONIC DEVICES 

FROM WH-ICH A.COMPUTER IS CONSTRUCTED, 
V, . ■ . . , . . 

•" . ^ ' • \ . . ' 

. "HEURisTIC *' ' ' ' ' ^ 

A TECHNIQUE BY MEANS .OE WHICH AN' IND IV IDUAL < OR MACHINEI 

CAN , BE ORGANIZED TO SOLVE PROBLEMS, WHEN APPLICABLE, IT MAY 

eRQVTDE A SHORTCUT TO THE GOAL BUT CANNOT GUARANTEE A SOLUTION 

OR AN OPTIMAL SOLUTION. SEE "ALGORITHM," 

* _ - 

HOUSEKEEPING V ' ' ' . 

OPERATIONS IN A ROUTINE WHICH 00 NCT CONTRIBUTE DIRECTLY 
TO THE SOLUTION OF, A PROBLEM BUt DO CONTRIBUTE DIRECTLY -TO THE 
EXECUTION OF A PROGRAM BY THE COMPUTER, 

IDENTIFIER ' ' • , . 

, , A SYMBOL WHOSE PURPOSE IS TO lOENT IFY, . INDICATE , OR NAME A 
BODY OF. DATA. . .. 

/ * 

INDEX ^ • . 

AN ORDERED REFERENCE LIST OF THE CONTENTS OF A FILE OR 
.DOCUMENT, TOGETHER WITH'KEYS OR REFERENCE NOTATIONS FOR 
tlOENT'IFICATlON OR LOCATION OF THOSE CONTENTS, OR 2 A SYMBOL OR A 

NUMBER USED TO IDENTIFY A PARTICULAR QUANTITY IN AN ARRAY OF 

SIMILAR QUANTITIES, 



2S7 - ' , /. 
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IWOeXEO SEQUENTIAL , . " 

A DATA SET WHOSE RiCOROS ARJE QftGANIiED ON THE BA^IS OF A 

COLLATING SEQUENCE OETERMiNEO BY KEYS THAT WCEOE EACH BLOCK OF 
DATA, 



INITIALIZE 

TO SET COUNTERS, SiTTM^ES* AND AOOR^S^E? TO ZERO 4DR' Of HER 
STARTING VALUES AT THE BEGllWXNG OF 9 OR AT pReSCRl-aF0..POINT.S IN* 
A COMPUTER ROUTINE. 




_ _ , - .. 

INTERFACE " • ' 

^-^AREO BOUNOARY, ' ' ■ ' J 

*^ ** • ■ lb 

* • • 

INTERPRETER • , , ,\ ' • 

A DEVICE THAT ^RiNTS ON / PU'KjC fifed- Var'^ THf ortA Al^REAOVC-"''* 
PUNCHED IN THE CARD. * • ^ V * » ' ^ / ' J^^-' ' ' J 

" * .» , * 4 . / M . 

• " t. ■ • '^-^ . ^ . 

INTERRUPT ROUTINE * ^ ' ^ , , 

A SECQNOARV PROGRAM t .^AK^^? At^T 10(4-' FSiLtl WING A TRAfiiSFIBR . 
FROM "Tt«E MAIN PROGRAM, - . ^ . ^ ^ ' *V 



* V • *, 

; A COLl^CTltJI^ OF RELAT^€|^,.C;HAi^ACTE«S, TREAXBO AS A^JNIT*". 

\^ntras;f---^J(^^ ■■• 'Vi^ • ' :.; ' *• ' *" ; 

IDLE TfME . /' ■ ■ - ^ - . : , 

THE TIME THAT A COM.ShER lS>VA}LA0l.e FOR Ai^^-,' .BUT" I S N^^T,-,- 
IN OPERATl.ON* „ v , - .. • M- ' *. , ' . • . 




INDE)L RBGIST^R * 

' A REGISTER CONTAlNINf^JW^JT.y-^frfH^^^^ 
FOR MODIEYINO THE A0D«^E5S M^T O^^k'j NSf?!lUCTJL*bw, ^EOB <Qt?-Nt TNG, 
OR ECR OTHER PURPOSES 'AS OI^ftEfTtp BY THE PROGRAM, " ^ \y . 

INfORMATION Pi^OCESSING ^.1, " > ' ' • ''V-V- .\ • 

' THE STORAGEf .R^TRlEVAiV ARft"AN^6flENt;' 'lifeLE^\|^ "* 
TRANSFORMATION OF fKlgORi^AT |-0N* aENERA^.LY* APPf-rED ^M-CAI\R-Y|N« " 
.OUT SUCH OI^ERATIONS WITH ^H£ IJ)"', 6F /AI^.^^JI^eR^W, aiV/l Ul XOMPWe^. ^: ^ 



INFORMATION RETRIEVAL ■ • V t / ' ? 

THE LOCATION „ANO SELECTION* 0N^MAfW*'^<3lf' t>0C<im^TATION' s ' 
OR GRAy>H1C RECORDS RELEVAImT TO A GIVEN IN"F0RMAT lONI RtqUOT^BNi; 
FROM A FILE OF SUCH -MATERIAL* -v'-?. .v--. - ^ *' 
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INFORMATION STORAGE AND RETRIEVAL 

THE ARRANGEHENT OF DOCUMENTATION OR RECORDS !N A ^ 
SYSTEMATIC WAY TOGETHER WITH THEIR SUBSEqUENT LOCATION AND 
SELECTION ON DEMAND. SEE ."I NFORMATI^ON RETRIEVAL." 

INPUT-OUTPUT 

If^PWTj INf^ORMATION READ INTO THE COMPUTER FROM THE "OUTSIDE 
WORLD*" OUTPUTS INFORMATION TRANSFERRED FROM THE COMPUTER TO 
THE "OUTSIDE WORLD* « AM ADJECTIVE, "INPUT" PERTAINS TO THE 

DEVICES WHICH BRING INFORMATION INTO THE COMPUTER, AND "OUTPUT "< * 
ANALOGOUSLY. . / ' 

_ . . .... * . . 

r 

INQUIRY ' 
^ A REQUEST FOR INFORMATION FftOM STORAGE, E.G., A REQUEST 

• FOR THE NUMBEI^ OF AVAILABLE AIRLINE SEATS. 

) • 

iNST^il^iON • • ^ ^ ^ 

. i^TATEMENT THAT CALLS FOR A. SPECIFIC COMPUTER OPERATION. 

INTERLEAVE ; ^ - . A ^ 

TO INSERT SEGMENTS OF ONE PROGRAM 'INTO ANOTHER PROGRAM SO 
THAT OUR^J^G PROCESSING OKAYS IW ONE PROGRAM, PROCESSING CAN 
, CONTINUE ON SEGMENTS OF ANOTHER PR-QGRAM^ A TECHN IQUE- US ED IN 
MULTIPROGRAMMING* , . • , 

** * ' . . 

. , ; INTERRUPT * ^ . " V < 

A BREAK' IN THE NORMAL FLOW OF PROCESSING. THE TOMAL JOB 

; flow-Can b£ resumed from that point-at a later time, an 

INTERRUPT IS USUALLY CAUSED_BY A SIGNAL FROM AN FXT ERNAL ' SOURCE, 
E.G., A TERMINAL UN'IT. ^ " " A 

W . ■ ■ - 

ITERATE ' . f . ' 

* C -TO REPEAT, AUTQMAT ICAV L Y, UNDER p.ROG(]t A M COf^ROL , THE SAME 
y «. SERIES' OF PROCESS LiMG STEPS UNTIL A PREDETERMfWO STOP OR 
BRANCH CONDITION I S REACHED; ro. LOOP. .* 

• JACM ^ - • ' 

, JOURNAL OF THE ASSOCIATfON FOR COMPUTING MACHINERY. 

• .1 

^ ■ • . ■ ■ . /• 

^^06 • ^ . , ' , , ^ 

A UNIT OF COMPUTER DATA-PROCESSING WORK. USUALLY DEFINED AS 
, 'THE PROCESSING OF A SINGL^JE USER S PROGRAM. 

. :' ■ ..■ ■ ■ ^ ■ . • 

JOB CONTROL LANGUAGE i ^ 

STATEMENTS OF A SPfC ITIC ' FORMAT "WH ICH AFFECT PROCESSING 
USl>ALLV IN THjP FORM' OF. PROGRAM . CONT ROL CARDS. ^ 

ERIC ■ . ' :2S9 
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■> A KEYBOARD-^CTUAtEO .0€V!C6>fHAT PUNCHeS- HOLES IN A CARD TO- 

RePRESENT OATA« 



KItOMEGACYCtE 

A BILClON.CYCLES>eR SeCQfNO. A REPETI T!ON' RA TE IN WHICH 
AN EVENT IS REPEATEQ/^ BILMTON TIMES .PER SECOND, 



KINETICS ✓ / ^ 

THE SCIENCE THE RATE d'p CHEMICAL REACTIONS! THE BRANCH 
OF OYNAMICSXeaL IN^/WITH THE CHANGE S OF MOTI ON P4^O0UC60 BY 
FCRCES. • 



LABEL 



^ KEY /1<TJ'ACHED TO THE ITEM OF DATA ^1^AT IT IDENTIFIES, 



^ARGE itORE STORAGE* A LOW COST AUXILIARY BULK STORAGE UNIT 
OGSI^eNEO FOR USE WITH THE IBM SYSTEM/360- J / 

' . * 

IBRARY ^ 

A COLLECTION OF ORGANl'ZfeO INFORMATION USED FOR STUDY ^AND 
REFERENCE, SEE PROGRAM- L I'BRARY* 



LINKAGE » 

/ .THE MEANS BY WHICH COMMUNICATION IS EFFECTED BETWEEN TWO 
ROUTINES OR CONTROL SECTIONS, 



LANGUAGE / • 

, -A MEANS OF COMMUNICATION BY MEANS OF EXPRESSIONS. 
SPECIFICALLY, ANY MEANS OF COMMUNICATING INSTRUCTIONS AND DATA 
.TO AND FROM A COMPUTER USING SYMBOLS OR PATTERNS PERCEPTIBLE TO 
BOTH THE HUMAN AND THE MACHINE. 



LIBRARY ROUTINE 

A SPECIAL-PURPOSE PROGR^iM WHICH MAY BE MAINTAINED IN 
STORAGE FOft USE WHEN NEEDED. . . ' 



LI ST PROCESSING ' • 

THE PROCESSING OF I^^F0RMATlON ORGANIZED IN LISTS 
ORGANIZATIONS IN WHICH EACH ELEMENT IDENTIFIES ONE OR MORE 
SUCCEEDING ELEMENTS).' ' . 



FRir 
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LIST STRUCTimiS N 

AN fLEMCNT OF A L 1ST MAY, ITSELF, BE THE NAME Qf A LIST* 
THE mm CpHPLEX QR^Mil 2AT IONS THAT CAN BE CONSTRUCtEd BY 
HAVING THE'^ NAMES OE^^TS hS ELEMENTS OF OTHER LISTS ARE 



CALLED LIST STRUCTURES^ SEE «L!^T PROCESSING,* 



S ' ■ ^ • 

LOAO , ' 

^ TO -PL ACE OATa'^INTO MAIN CORE STORAGE* 

LOOP • . 

^£E ITERATE* 

/ ■ ; 

» 

MACHINE INSTRtfcTlON . ♦ . . 

AN INSTRUCTION THAT A-^ACHINE CAN RECOGNIZE AND EXECUTE. 



MATRAN ^ » • 

MATRIX TRANSLATIONo A'^TYPE 0^ MATHEMATICAL PROGRAMMING 
LANGUAGE. . " 

ft 

MATRIX . • , . 

A RECTANGULAR, ARRAY OF NUMBERS SUBJECT TO MATHEMATICAL 
OPERATIONS* SUCH AS ADDITION, MULTIPLICATION, AND INVERSION, 
ACCORDING* TO, SPECIFIED RULES. BY EXTENSION, AN ARRAY OF ANY 
NUMBER OF"* DIMENSIONS. 

MEMBER ^ ' > 

AN ENTITY WlTHlVj A OIRECTORl^O QATA SET, INDEXED IN THE DATA 

SET S DIRECTORY AND HAVING DATA CONTENT. 

- . i ^ 

* 

MET ^ 

MULTIPROGRAMMING WITH FIXED NUMBER OF TASKS. 



1 

MODULE 

I A SEGMENT OF CORE STORAGE, OR 2 A PIECE *bF PERIPHERAL 
EQUIPMENT MITH A SPECIFIC STORAGE CAPACITY, E.G.v^A DISK MODULE. 

MULTIPLEX 

TO INTERLEAVE OR SIMULTANEOUSLY TRANSMIT TWO. OR MORE 



{ 



MESSA'GElS ON A SINGLE CHANNEL , , , 

MVT . 

MULTIPROGRAMMI<J|G WITH VARIABLE NUMBER OF TASKS • 

• • • * 
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•A, 

HAVING A FORM WHICH 0< 
OF ANY COMPUTER OR CLASS OF COMPUTFRS^ 



HAVING A FORM WHICH DOGS NOT OH PENG ON THE PECULIAR IT iJeSj 



MACHINE LANGUAGE ' . - ^ 

A VOCABULARY OF «WORDS«» MEANINGFUL TO A COMPUTER; A STRING 

OF DIGITS ACCEPTABLE TO AND MAViI PULAT ABLE BY HACHINE CIRCUITS 

TRAINS OF ELECTRICAL PULSES SETTING AND RESETTI NG .COMPUTER 

CIRCUITS OR MEMORY* " • ' 



MACHINE-^REAOABLE FORM 

A FORM IN WHICH INFORMATION IS ACCEPTABLE TO A MACHINIE, 
FOR EXAMPLE* PUNCHED 6aR0S OR MAGNETIC TAPE CAN CONTAIN INFORMA- 
TION IN MACHIN.E^REACABLE FORM, WHEREAS HANDWRITING USUALLY DOES 
NOT. 



MACRO INSTRUCTION , - ' „ 

V A SINGLE INSTRUCTION THAT CAUSES THE COMPUTER TO EXECUTE A 
PREDETERMINED SEQUENCE^ OF MACHINE INSTRUCTIONS. 



MAGNETIC 1 

OF, PRODUCING,^ C/^USEO 8\, OR OPERATED BY MAGNETISM, 

1 

MAGNETIC CORE • , , 

A OOUGHNUT'-SHAPEO PIECE OF FERRITE WHICH CAN BE MAGNETIZED 
IN EIT1HER A POSITIVE (CLOCKWISE-) OR NEGATIVE (C^UNTER-CLOCia^I SE ) 
SENSE AND SO CAN RECORD A "81T.« RECTANGULAR ARRAYS OF MAGNETIC 
CORES SITUATED ON THE INTERSECTIONS OF HORIZONTAL AND VERTICAL 
SETS ,0f WIRES FORM A «CORE PLANE." THE MAGNETIC STATE OF AN 
INDIVIDUAL CORE CAN BE CONTROLLED AND TESTED BY SELECTING THE 
HORUONTAL WIRE AND" THE VERTICAL WIRE THAT INTERSECT AT THAT 
CORE* . ' ' • 

MAGNET IC DISKS ' * . * ' ^ 

• THIN, FLAT, CIRCULAR OBJECTS COATED W ITH MAGNET IZABLE 
MATERIAL SO THAT^DIGUAL RECORDINGS CAN BE. MApE THEREON, 
CHARACTERISTICALLY SUCH DISfCS PftoVIDE HIGH DENSITY OF RECORDING 
PER UNIT VOLUME WITH RFLAT|VELY SHORT ACCESS TIMES TO THE 
INFORMATION RECORDED. • - ' . x 

- . ' t_ ■ \ ' 

MAGNETIC-INK CHARACTER RRCOGNITION ' 

THE PROCESS QF MECHANICALLY RECOGNIZING CHARACTERS WHICH 
ARE RECORDED IN MAGNETIZABLE INK. PRINTED. CHARACTERS, WHEN 
MAGNETIZ^eO, CAN. BE RECOGNIZED BY TV^E UNIQUE PATTERNS OF MAGNETIC 
.INDUCTION CREATED AS THE PRINTED PATTERNS PASS A MAGNETIC-READ- 
ING HEAD. " 

. ^ • ' ' " • • •. 
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^AGNeT!C'-REAOIN€ HEAD 

AN eteCTROMAGNET USED FOR CONVERTING 6tECTR!CAL SIGNALS INTO 
A HAGfr€TIC RECOROINGe CONVOftTING A MAGNETIC RGCOROING INTO 
ELECTRICAL SIGNALS ♦ OR EftAS I NG .A MAGNET IC RECOROINGl FOR. INST^NCB 
ON A MAGNETIC 6ISK0 * • ' 

MAGMETIC RESONANCE 

THE PHENOMENON IN WHICH A MOVEMENT OF A PARTICLE OR SYSTEM , 
OF PARTICLES IS COUPLED RESONANTLY TO AN EXTERNAL MAGNETIC FIELD, 

t 

.MAGNETIC TAPE * • 

- A PLASTIC TAPE WITK,^ MAGNETIC SURFACE ON WHICH DATA CAN BE 
STORED IN A CODE OF MAGNETIZED SPOTS. 



MAGNETIC THIN-FILM 

A LOGIC OR STORAGE ELEMENT COATED WITH AN EXTREMELY THIN 
rAYER OF MAGNETIC MA.TERIAL, USUALLY LESS THAN ONE MICRON THICK 
t ABOUT FOUR HUNDRED-^ HOUS ANOTHS OF " AN INCH I. 



MARK-SENSE 

TO 'MARK A POSITION ON A CARD QR PJ^PER FORM WITH A PENCIL. 
THE MARKS ARE THEN INTERPRETED ELECTRICALLY FOR MACHINE 
PROCESS INGo 



MATHEMATICAL MODEL * ^ 

A SET OF MATHEMATICAL EXPRESSIONS THAT IDE SCR I BE S SYMBOLI- 
CAiLY THE OPERATION OF A PROCESS, DEVICE OR CONCEPT. 

ME^^ORY ° • • 

THE TERM "STORAGE" IS PREFERRED BY ALL ANT I ANTHROPOMORPHl STS 
BUT "MEMORY" PERSISTS, IT REFERS TO THE CAPACITY OF A COMPUTER • 
TO STORE INFORMATION SUBJECT TO RECALL,- OR TO THE COMP^iieNT) OF 
THE COMPUTER SYSTEM IN WHICH SUCH INFORf^ATlON IS STORED, 

MEWCRY PROTECTION' ' , 

• A SYSTEM OR DEVICE WfTi CH ASSURES THAT INFORMATION RECORDED 
CANNOT BE REPLACED, E ITHER' INADVERTENTL Y OR INTENTIONALLY, BY 
INFORMATION OTHER THAN THAT INTENDED BY AN EXECUTIVE SYSTEM. 

MICROELECTRONICS « ' ' " 

THAT FIELD OF ELECTRONICS DEALING WITH THE M IN I ATUR UATION 

CIRCUITS BY THE COMBINATION OF A J^UMBER OF ELEMENTARY CIRCUITS 
INTO A COMPOSITE* 



MICROSECOND 

A MILLIONTH PART OF A SECOND 



erIc 293 • . ^ 
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MRLIS€CONO ' . 

A THOUSANDTH PART OP A SCCONO. ' 

MNEMONIC COOe . . 

ASSEMBLY I.ANGUAG6 COOC WHICH IS EASY FOR THE PROGRAMMER TO 
REHCMeeR BECAUSE Of ITS MNEMONIC NATURE, E.G*, MPY FOR MULTIPLY 
AND ACO FOR ACCUMULATOR, • . 

MONITOR 

A SYSTEM THAT REMINDSt CAUTIONS, OR WARNS ONE OF SITUATIONS 
THAT CAN INTERFERE WITH THE PROPER EXECUTION QF, INT ENOED 
ACTIVITIES. , 



MONTE CARLO METHODS 

METHODS OF COMPUTATION BASED ON PR084fBILITY THEORY THAT 
USE RANDOM NUMBERS AND STATISTICAL METHODS TO FIND SOLUTIONS TO 
VARlroUS TYPES OF PROBLEMS* ' 



MULTI-PROCESSING 

ro PROCESS MULTIPLE REQUIREMENTS CONCURRENTLY ON A SYSTEM 
SO THAT EACH REQUIREMENT IS SATISFIED SEPARATELY. 

( - ' . , 

MULTIPROCESSOR 

A MACHINE WITH MULTIPLE ARITHMETIC, LOGIC AND >1AIN STORAGE 

UN.ITS THAT CAI^I BE USED SIMULTANEOUSLY ON MORE THAN ONE PROBLEM, 



MULT IPROGRAMMI.NG 

SEE INTERLEAVE, 



NONDESTRUCTIVE READ , 

A READ PROCESS' THAT DOES NOT ERASE THE DATA IN THE SOURCE. 



NUMBER" SYSTEM ' 

A SYSTEM FOR THE REPRESENTATION OF NUMBERS, E.G., THE 
DECIMAL SYSTEM, THE ROMAN NUMERAL SYSTEM, THE BINARY SYSTEM, 

NANCSECOND \ ' ' 

A BILLltJNTM PART OF A SECOND, 



NETS , ^ ' ^ 

SYSTEMS OF INTERCONNECTED POINTS TO WHICH FORMAL RELATION 
SHIPS CAN BE APPLIED. 

• \ 
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. NU?»ERICAL ANALYSIS • • 

^ THAT BRANCH OF MATHEMATICAL ANALYS IS* WHICH DEALS WITH THE 



CONVERSION OF MATHEMATICAL PROCESSES INTO OPERATl ONS W I^TH' 
NUMBERS, . ^ ; 



W^l 



OBJECT LANGUAGE ^ ' / 

THE RESULT OF \A TRANSLATION PROCESS STARTING WITH A SOURCE 
LANGUAGE. USUALLY, SYNONYMOUS WITH MACHINE LANGUAGE* • 



OCTAL 

PERTAINING TO THE NUMeER SYSTEM WITH A BASE QF EIGHT, 



GFF-LINE 

PERTAINING TO EQUIPMENT OR DEVICES NOT UNDER DIRECT CONTROL 
OF THE CENTRAL PROCESSING UNIT. 



OP CODE 

OPERATION CODE* ITCOMPUTER INSTRUCTION CODE, 

\ 

OPEN SUBROUTINE 

A SUBROUTINE THAT MUST BE RELOCATED AND INSERTED INTO A 
ROUTINE AT EACH PLACE IT IS USED. SYNONYMOUS WITH DIRECT INSERT 
SUBROUTINE. CONTRAST WITH- CLOSED SUBROUTINE. 



OPERATOR 

A PERSON ^HO OPERATES A MACHINE. 



OS/360 

OPERATING-' SYSTEM/360. SUPIERVISOR FOR NON TIME-SHARED 360 
SYSTEKSrf * ^ 



OVERLAP * . ' ' . 

PROCESSING AND INPgT/OUTPUT TO DO SOMETHING AT THE SAMt 
TIME SOI«tETHfNG ELSE IS BEING OONEt FOR EXAMPLE, TO PERFORM 
INPUT/OUTPUT OPE-RATIONS WHILE INSTRUCTIONS ARE BEING EXECUTED BY 
THE" CENTRAl,.^OCESSING UNIT. 

t 

OVERLAY 

THB TECHNIQUE OF. REPEATEO.LY USING THE SAME 'BLOCKS OF 
INTERNAt STORAGE* DURING DIFFERENT STAGES OF A PROBLEM, WHEN ONE 
ROUTINB- IS NO LONGER NEEDED IN STORAGE* ANOTHER ROUTINE CAN ' 
REPLACF ALL OR PART OF I TV ' 



ERIC 
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OBJECT PROOftAM 

THE RESULT OF TWANStAT!NG, A PROGRAM FROM ITS ORIGINAL FORM 
INTO A MACHINE-ReADABLE FORM; THE ACTilAL RUNNING PROGRAM, 



ON-LINE 

OPeRATION UNDER DIRECT CONTRQJL OF THE COMPUTER; TASKS \ 
PERFORMED UNDER DIRECT COMPUTER CONTROL • 



OPEN-SHOP PROGRAMMING . 

A BASIS FOR ORGANIZING WORK IN A COMPUTING CENTER IN WHICH 
.THE PERSON WITH THE PROBLEM TO SOLVE OOESHIS OWN PROGRAMMING 
WITH OR WITHOUT , HELP FR,OM PERSONNEL ATTACHED TO THE CENTER. 

OPERATING SYSTEM • 

AN INTEGRATED COLLECTION OF COMPUTER INSTRUCTIONS THAT 
HANDLE SELECTION, MOVEMENT AND PROCESSING OF PROGRAMS AND DATA 
NEEDED TO SOLVE PROBLEMS. • 



OPTICAL READER 

A DEVICE USED FOR MACHINE RECOGNITION OF CHARACTERS BY - 
IOENTI.F ICAT ION OF THEIR SHAPES. 

r 

OPTICAL SCANNING 

A PROCESS IN WHICH A L IGHt BEAM REFLECTED FROM (OR 
TRANSM! TTEO .THROUGH) A SOURCE DOCUMENT IS ANALYZED TO IDENTIFY 

THE Symbols on that document, the light beam is controlled to 
SCAN the document in some predetermined way. . ^ * 



OUTPUT 

1. THE FINAL RESULTS AFTER DATA IS PROCESSED IN A COMPUTER. 

2. The DEVICE OR SET OF OEV I CES„ US ED ^FOR TAKING DATA OUT 
0^^ A COMPUTER SYSTEM AND PRESENTING THEM TO THE USER IN THE FORM 
HE DESIRES. * ^ 



PARALLEL - ^ . . 

PERTAINING Tb THE SIMULTANEITY OF TWO OR MORE PROCESSES, OR 

2 PERTAIN! NO. TO THE SI MULTANEI T Y *0F TWO OR MORE SIMJLAR OR 
lOENT ICAL PROCESSES . 

<- PARAMETER \ ' . 

.A VARIABLE THAT 'tS GIVEN A CONSTANT VALUE FOR A SPECIFIC 
PURPOSE OR PROCESS. , • ^ 

PARITY • * . ' ** 

'AN ERROR DETECTING TECHNIQUE/IN WHICH A REDUNDANT BIT. IS 
USED WITH AN ARRAY OF BITS SO THAT THE S^M OF EACH GROUP OF BITS 



ERIC 
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IS ALWAYS mty OR. At WAYS GVeN. 



PARITY BIT 

A~BINARY, OI(fl T APPgNOeO TO AN ARRAY OF BITS TO HAKH THH SUM 
OF ALL THE BITS ALWAYS 000 OR ALWAYS £V6N» 

PARITY CHECK / 

A CHFCK THAT TESTS WHETHER THE NUMBER OF ONES OR ZEROs'lN AN 
ARRAY OF BINARY DIGITS IS ODD OR EVEN, 



PATCH 

TO MODIFY AROUTINE IN A ROUGH OR EXPEDIENT ' WAY, 



PCP ENVIRONMENT 

PRIMARY CONTROL PROGRAM, 



PDS 

PARTITIONED DATA SET. 



PL /I ( 
PROGRAMMING LANGUAGE* LEVEL I ^ 



RESET 

TO ESTABLISH AN INITIAL CONDITION, 



PROBLEM .PROGRAM ' ' 

ANY OF THE CLA^S OF ROUTINES THAT PERFORMS PROCESSING OF THE 
TYPE FOR WHICH A COMPUTING SYSTEM IS OMTENOEO, 



PROC . " 

PROCEDURE. t 



PROCESS CONTROL. BY COMPUTERS • 

PERTAINING TO SYSTEMS WHOSE PURPOSE IS TO PROVIDE AUTOMATION 
OF CONTINUOUS OPERATIONS. THIS IS CONTRASTED WITH NUMERICAL 
CONTROL WHICH PROVIDES AUTOMATION OF DISCRETE OPERATIONS, 



PRpCLIB * 

PROCEDURE LIBRARY, A LIBRARY OF JCL STATEMENTS CALLABLE BY 
PROGRAMMER S« " • 



PROGRAM LIBRARY • • 

A COLLECTION^OF AVAILABLE CCMPUTER PROGRAMS AND ROUTINES • 
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PAPER-TAPe READER . . 

A Device WHICH senses and TRANSLATES THE HOLES IN A ROLL OF 
PERfOftATEO PAPER TAPE INTO MACHINE-PROCESSABLE FORM, ' 



J^ARALIEL PROCESSING . 
TO PROCESS SIMULTANEOUSLY WITH JSEPARATE EQUIPMENT, 

PATTERN. RECOGNITION • / ' 

THE PROCESS OF LOCATING AND lOEriTIFY/f^ A PATTERN SUCH AS 
THOSE MADE BY PRINTED LETTERS, BUBBLES-CHAMBER PHOTOGRAPHS, 
ASTRONOMICAL PHOTOGRAPHS AND SPECTRA, X-RAY PHOTOGRAPHS ♦ AND 
CLCUO-COVER PHOTOGRAPHS, ' 

P/< INTER . 

A DEVICE WHICH PRINTS RESULTS FROM A COMPUTER ON PAPER. 



PROBLEM-ORIENTED PROGRAMMING LANGUAGE 

AN ARTIFICIAL LANGUAGE IVOCABULARY AND RULES) CONVENIENTLY 
EXPRESSING RELATIONSHIPS BETWEEN A PARTICULAR PROBLEM OR CLASS 
OF PROBLEMS AND THE METHOD OF SOLUTION. SEE ALSO "FORMAL 
LANGUAGE," "PROCEDURE-ORIENTED LANGUAGE," "MACHINE LANGUAGE," 
j^NO "LANGi/AGE." ' 



PRCCEOURE-OR I ENT ED PROGRAMMING LANGUAGE 

A LANGUAGE FOR WRITING COMPUTER PROGRAMS THAT CONVENIENTLY 
EXPRESSES CERTAINyROBLEM^-SOLVING PROCEDURES. SUCH LANGUAGES 
S'HOULO BE DISTINGUISHED FROM PROBLEM-ORIENTED PROGR°AMM ING , 
LANGUAGES .WHICH ARE DESIGNED TO FACILITATE TH^ SOLUTION OF A 
TYPE OF PROBLEM, 



PROCESSOR 

A GENERIC TERM WHICH INCLUDES .ASSEMBLY, COMPILING, 
GENERATION, ETC. 



PROGRAM INOUN) 

A PLAN FOR THE SOLUTION OF A PROBLEM. OFTEN USED INTER- 
CHANGEABLY WITH "ROUTINE" TO SPECIFY THE PRECISE SEQUENCE OF 
INSTRUCTIONS ENABLING A COMPUTER TO SOLVE A PROBLEM. 
PROGRAM I VERB) - ^ 

TO MAKE A PROGRAM, INCLUDING INVESTIGATIONS OF SOLUTION 
METHOD, NUMERICAL ANALYSIS, APPROPRIATE PARAMETER CHOICES, AND 
SO ON.- THE WRITING OF A SEQUENCE OF INSTRUCTIONS IS ONLY PART 
OF PROGRAMMING ALTHOUGH OFTEN THE TERMS ARE USED I NT-ERCHANGEABV Y 

\ . • 

PROGRAM DECK . • \ • 

A SET OF PUNCHED .CARDS IDECKI CONTAINING iXsmUCTIONS 
THAT MAKE UP A COMPUTE.R PROGRAM. \ 
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PROGRAM INTeRftUPT ^ 

A SIGNAL CAUSING A COMPUTER TO STOP 6XECUTJDN OP THE CURRENT 
PROGRAM BUT TO. SAVE THE STATUS OF THE MACHINE SO THAT THAT 
PROGRAM WILL BE ABLC TO CONT INMB AFT€R THH INTERRUPTING PROGRAM 
IS FINISHED* ALSO THE CORRESPONDING ACTION.' 

PROGRAM MAINTENANCE 

COMPUTER PROGRAMS REQUIRE PERIODIC MAINTENANCE TO REMOVE 
ERRORS AND DISCREPANCIES WHICH MAY BE DISCOVERED AFTER LONG 
PERIODS OF USE* Tt) CORRECT ADDITIONS OR DELETIONS WHICH MAY HAVE • 
BEEN INADVERTENTLY MAOE,*TQ IMPROVE AND MODERNIZE THE PROCEDURES 
USeOt AND TO ADAPT THEM TO USE NEW UNITS OF EQUIPMENT WHICH 
MAY BE ADDED TO THE COMPUTER, 

PROGRAMMING ^ ' 

THE PROCEDURES CONTRIBUTING TO THE DEVELOPMENT OF A SEQUENCE 
OF INSTRUCTIONS FOR COMPUTER SOLUTION OF A PROBLEM? INCLUDES 
PROBLEM ANALYSIS, PROGRAM ^)ES!GN, COOING, ANb TESTING, 



PRO,GRAMMING LANGUAGES 

THOSE LANGUAGES DEFINED AND USED FOR THE PROGRAMMING OF 
DIGITAL COMPUTERS. 



PROGRAMMING SYSTEMS 

PROGRAMS AND PROCEDURES DESIGNED AND. USED TO ASSIST IN THE 
PREPARATION OF DIGITAL-COMPUTER PROGRAMS. AMONG SUCH AIDS ARE 
COMPILERSt DIAGNOSTIC PROGRAMS, AND PROGRAMS tO PRODUCE FLOW 
CHARTS. V 



PROJECT EVALUATION AND REVIEW TECHNIQUE 

A MANAGE ME NT-.CONTROL TOOL FOR DEFINING, INTEGRATING, AND 
INTERRELATING WHAT MUST BE DONE TO ACCOMPLISH DESIRED OBJECTIVES 
ON TIME. A COMPUTER IS USED TO COMPARE CURRENT PROGRESS AGAINST 
PLANNED OBJECTIVES AND TO GIVE MANAGEMENT INFORMATION FOR PLAN- 
NING AND DECISION-MAKING. SEE «CPM." 



PUNCHED CARD ^ , 

1. A CARD PUNCHED WITH A PATTERN OF HOLES TO REPRESENT 
DA^TA. - / 

2, A CARD AS IN 1, BEFORE BEING PUNCHED (SLANG)'. 



QUANT] TATE * . . , t 

. to MEASURE OR ESTIMATE THE QUANTITY OF; Td> EXPRESS IN 
QUANTITATIVE AERMS. 



o 
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QUANTUM CH€MJS|«Y ^ * 

THAT PORTION OF'CHEMISTRV^ BASED pf^ THE THEORV T.HAT eNEftCY I 
NOT ABSORBEO Of^ R AdIAT Ca CONT INUOUSL Y BUT 01 SCONTINUOUSt Y, 4N 
C^EFIfsriT6 UNITS CALLEb QUANT A« 

RADIX • ' , * • 

THE BASE OF A NUMBER SYSTEM TEN FOR THE 0 
THE BINARY, EIGHT FdR THE OCTAL, ETCV 



<IMAL, -TWO FOR 



RANGE 



THE SET pF VA^jUES TfiAT A QUANTITY OR .FUNC T IQN MAY ASSgME* 



READ 



TO ACQUIR,E DATA. FROM SdUReE-* 



RECORD . 

A S^T OF DATA. 



i. - 



RELATIVE ADDRESS - - 

THE NUMBER THAT SPECIFIES THE DIFFERENCE BETWEEN THE ' ' * 
ABSOLUTE ADDRESS AND THE BASF ADDRESS* ' * 

REMOTE TERMINAL ' - 

ANY/OEV.ICE CAPABLE OF SEND ING ' ANO/OR RECEIVING INFORMATION 
AT A OI-STANT LOCATION OVER A C OMr^UN! GAJ^IOTJ CHANNEL • ' 

. \ • - ' 

RES^T \ • - * ' - 

. TO RESTORE- A ^STORAGE DEVICE TO A PRESCRIBED INITIAL STATE, 
NOT NECESSARILY THAT DENOTING ZERO. - 



RESJART , , 

TO RETURN TO A PREVIOUS POINT IN A PROGRAM AND, RESUME 
OPERATION FROM THAT POINT. 



RJE 



RPG 



REMOTE JOB.^NTRY. 



REPORT PROGRAM GENERATOR. A HIGH LEVEL . 9U^tNES$-0R I ENTEO 
PROGRAMMING LANGUAGE FOR CREATING REPORTS-. 



RUN 



A SINGLEt CONTINUOUS PERFORMANCE OF A-COMPUTER RQUTINE, 
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RANDOM-ACCESS MEMORIES 

COMPUTER MEMORIES IN MHICH THE TIME REQUIRED TO LOCATE 
THE NEXT POSITION FROM 'WHICH INFORM AT lOM- IS TO BE OBTAINED .IS IN 
NO WAY DEPE-NOENT ON THE PDSI TION "LAST LOCATED, : 

REACTION TIME * . 

•THE TIME FRaM THE APPt ICA TI 0*N OF A STIMULUS TQ THE RESPONSE 
TO THAT STIMULUS. THE T IME FROM THE SUBMISSION OF A JOB 'bY AN 
.INVESTIGATfIR TO ITS RETURN TO THE f NVESTIGATOR, 

! ^ * 

REAL TIME 

THE TECHNlOUE QF COMPUTING WHILE A PROGESSyAKES PLACE SO 
THAT RESULTS CAN RE USED TO GUIDE OPERATION OF THE PROCESS. 



REGISTER 

A SPECIAL DEVICE THAT HOLDS INFORMATION READY FOR 
MANIPULATION. IT HOLDS ONLY'^A P"ART ISUCH AS A. WORD) OF 'THE 
TOTAL/ INFORMATION, IN A DIGITAL COMPUTER* • \ 

: ■ ■ ' , ■ ■ ■ C '•- ' 

RELOCATABLE PROGRAM ' 

A DIGITAL-^COMPUTER PROGRAM WHICH CAN BE PLACED IN ANY 

PORT ION '0^ THE COMPUTER MEMORY. THUS A PROGRAM INDEPENDENT OF 

LOCATION. , . , 

RESONANCE - - ..v 

THE REINFORCED VIBRATION OF A BODY EXPOSED TO THE VIBRATION, 
AT ABOUT THE >AME FREQUENCY, OF ANOTHER BODY OR PHYSICAL 
MAGNITUDE. 



ROUTINE ^' ^ 

A SEQUENCE OF MACHINE INSTRUCTIONS WHICH 'CARRY OUT A 
SPECIFIC PROCESSING FUNCTION. ^ ' 



SCAN , . 

TO EXAMINE SEQUENTIALLY, PART BY PART 



SEMANT ICS ' . ' " 

THE R6LA|jWSHIRs' BETWEEN SYMBOLS AND THEIR MEANINGS. 

SEQUENTIAL ACCESS $ 

OBTAINING QATA FROM AN INPUT/OUTPUT DEVICE IN A SERIAL 
MANNER ONLY, 
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SEQUeNTIAl CONTROL 

A MODE OF COMPUTER PPERATION |1N/hHICH INSTRUCTIONS ARE 
EXECUTED CONSECUTIVELY UNLESS SPECIFIED OTHERWISE BY A TRANSFER 
CCNTRQL. 



SEQUENTIAL OPERATION 

PERTAINING TO A PERFORMANCE OF OPERATIONS ONE AFTER T-HE 
OTHER, - • 



SNAPSHOT . . ' • , ^ 

SNAP A OOHP USUALLY OF A SELECTED AREA OF STORAGE ^TAKEN ' 
DURING PROCESSTNG AT SPECIFIED TIMES PROVIDING A TTMe HISTORY OF 
THE SPECIFIED STORAGE AREA FOR DEBUGGING PURPOSES. * 



SORTER • 

A DEVICE OR COMPUTER ROUTINE THAT SORTS. 



SPECIAL CHARACTER 

A CHARACTER SET, A . CHARACTER* THAT IS NEITHER* A NUMERAL* 
A LETfER» NOR A BLANK", E.G., ASTERISK, DOLLAR SIGN, l^QUALS SIGN, 
COMMA, PERIOO» ' 



SPOOLn 



SIMULTANEOUS PERIPHERAL OPERATION, ON LINE. 



STATEMENT , 

IN COMPUTER PROGRAMMINGf A MEANINGFUL EXPRESSION C^R 
GENERALIZED INSTRUCTION IN A SOURCE LANGUAGE, 




i 



STEP 



ONE OPERATION IN A COMPUTER ROUTINE. 



STORAGE CAPACITY 

THE AMOUNT OF DATA THAT CAN BE CONTAINED IN A STORAGE 
DEVICE. , 

SUBPROGRAM ^ > . . 

A PROGRAM THAT IS A' PART OF ANOTHER PROGRAM^ USUALLY 
SYNONYMOUS WITH SUBROUTINE.^ 

SYMBOL 

A REPRESENtATION OF SdMETHiNG BY MEANS OF RELATIONSHIP* 
ASSOCIATION, OR CONVEf^TION. 
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SYNTAX . . ^ ^ 

I THE STRUCTURC Of gXPRKSSIONS IN A LANGUAGE* OR 2 THE 
RULES GOVERNING THE. STRUCTimE OF A LANGUAGE* ( 

' ■ * . ' j 

SYSGEN . " . ,' 

SYSTEM GENERATlONf tM6 PROCESS BY \H\l(^H A NEW OPER^TIN 

SYSTEM AND SUPPORTING SOFTWARE e,G. COMPILERS AND UTILITY 
PROGRAMS I S CREATED IN A 360.^ t / 



SELF-'ORQANt ZING AOAPTIvfe SYSTEMS 

.ANY SYSTEM WHICH CAN CONTROL ITS OWN STRUCTURE Sp TH^T 
IT CAN ADAPT TO CHANGES IN ITS ENVIRONMENT, 



SELF-ORGANIZING SYSTEMS 

SAME. AS SFLF-ORQANIZING AOAPl^E SYSTEMS. 




/ 
/ 



/ 



SENSORS 

^'DEVICES TO DETECT AND MEA SURE PHYS I CAL PHENOMENA, SUCH'AS 
TEMPERA«TURE, STRESS^, HEARTBEAT, AND ACCELERATION. 



SIMULATION 

REPRFS-ENT ATION OF THE ESSENTIAL ELEMENTS OF SOME OBJECT, 
PHENOMENON, SYSTEM, OR ENVIRONMENT THAT FACILITATES ITS CONTROL 
AND STUDY (OFTEN BY OR INVOLVING AN AUTOM/\TIC COMPUTER), 



SLOW POTENTIAL 



A LOW-FREQUENCY COMPONENT (APPROXIMATELY 4-5 CYCLES/SEC » 



OF THE ELECTROENCEPHALO^GRAPH, 



SOFTWARE ' X " * ■ • 

COMPUTER PROGRAMS AND COLLECTIONS THEREOF, INCLUDING 
COMPILERS AND ASSEMBLERS WHICH CAN BE USED TO GENERATE OTHER 
PROGRAMS. ALSO INCLUDES EXECUTIVE AND DI AGNOSTIC ; PROGRAMS X'^ 
WHICH CAN BE USED TO SCHEDULE AND TEST OTHER PROGRAMS,' 



SOLID-STATE 

REFERS TO THOSE DEVICES WHICH UTILIZE THE EL 
MAGNETIC, OR PHOTIC PROPERTIES OF SOLID MATERIALS 
IStORS, MAGNETIC CORES, ETC. 



ECTRIC, 
^E.G., TRANS- 



SORT 



TO 



RANGE DATA IN AN ORDERED SEQUENCE. 
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/ * source' L ANGUAGf ^ 

/ . THE LANGUAGE IN WHICH A PROGRAM IS ORIGlfiALLY WRITTEN. 

{^^^ US€0 TO INDICATE THAT CONVERSION TO A'' MACHINE LANGUAGE 1$. 

REQUIRED* 

•» •■. . \ • 

•\ . 

*. SOURCE-LANGUAGE DEBUGGING ^ ^ ^ * : 

^ THE DETECTION AND CORRECTION OF ERRORS (BUGSI USING ONLY 
THE SOORCE LANGUAGE. 

.' . . . ■ • / .^ ' - 

SOURCE PR0(aRAM » 
, A PROGRAM IN ITS ORIGINAL FORM BEFORE BEING PROCESSED BY A 

,J COMPUTER. USUALLY REfERS TO PROGRAMS WRITTEN IN A PROCEOURE- 

ORIENTED LANGUAGE AS OPPOSED TO MACHINE LANGUAGE. 



SPECIAL-PURPOSE , 

BEING APPLICABLE TO A L*IMITEO CLASS OF USES WITHOUT 
J ESSENTIAL MODIFICATION. CQNSTRASTEO WITH «GENER AL-PURPOSE 



SPECTRAL ANALYS IS 

SEPARATION OF A SERIES OF VALUES TO IDENTIFY THEIR 
SIGNIFICANCE TO THE PROBLEM IN QUESTION. 



STORAGE . 

PERTAINING TO A DEVICE IN WHICH DATA CAN BE ENTERED AND 
STORED AND FROM WHICH IT CAN BE RETRIEVED AT A LATER TIME. 



STORAGE ALLOCAT ION 

tVIE ASSIGNMENT OF STORAGE LOCATIONS TO MAIN ROUTINES AND. 
SUBROUTINES THERiEBY FIXING THF OPERATING VALUES OF ADDRESSES IN 
RELCCATA8LE PROGRAMS. 



STORED )pROGRAM 

A P.ROGRAM IN 
THE BE.|4aVI0R OP A 
HAS ACCESS TO AND 



THE INTERNAL STORAGE SECTION WHICH CONTROLS 
COMPUTER OR OTHER DEVICE. THF COMPUTER THUS 
CAN CHANGE ITS OWN PROGRAM. 



STOREO-PROGRAM COMPUT 
A Ol'G''l'TAL COMPU/ 
AND CAN BE PROGRAMm/o 
THEY WERE DATA 
INSTRUCT IONS - 



AND i: AN 



THAT STORE.S INSTRUCTIONS IN MAIN CORE 
0 ALTER ITS OWN INSTRUCTIONS AS THOUGH 
SUBSEQUENTLY EXECUTE THESE ALTERED 



SUBROUTINE 

A PROGRAM SO ARR^NGtO THAT CONTROL MAY BE TRANSFERRED TO 
FROM A MAIN PROGRAMt AND* AT THE CONCLUSION OF THE' SUBROUTINE t 
CONTROL REVERTS TO THE APPROPRIATE POINT IN THE MAIN PROGRAM. 



IT 
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THIS AVOIDS REPEAT I THC SAH^ SEOUE^yCE Of INSTRUCTIONS AT OJF- 
FEftENT PLACES .^N THE PRINCIPAL PROGRAMS* ^ 

SUPEWCONOUCTIVITY - ^ / 

SOME METALS AND A ^REAt NUHBER OF ALLOYS LOSE ALL THEIR i 
ELECTRICAL RESISTANCE AT VERY LdW TEMPERATUJ\6S, tHE: TEMPERATURE 
AT. WHICH THIS OCCURS MAY VARY FROM A HRACTION OF A DEGREE TO A-- 
HIGH OF APPROXIMATELY 9 K FOR NIOBIUM, THESE METALS ARE CALLED 
SUPERCONDUCTORS, AND THE TEMPERATURE AT WHICH THE TRANSITION TO 
SUPERCONDUCTIVITY TAKES PLACE IS KNOWN AS THE CRITICAL TEMPERA- 
TUJ^E, VERY HIGH MAGNETIC FIELDS WILL CAUSE A SUPERCONDUCTI NG - 
MATERIAL TO TRANSFORM TO THE NORMAL STATE, THUS FAR, APPROX- 
IMATELY 2^ ELEMENTS MA VE' BEEI^J f OONO TO BECOME SUPE^CONOUCTORS IF 
TAKEN TO SUFFICIENTLY LO^ TEMPERATURES. 

' ■ h^. 

SWITCHING 

THE CONNECTION OF TWO POINTS OF A NETWORK AT CONTROLLABLE 
INSTANTS OF TIME* • ' 



SYRBOLIC LANGUAGE 

SEE MNEMONIC CODE. 



ScYSTEM ' ' 

AN ASSEMBLY/^OF UNITS, DEVICES, OR MACHINES UNITED BY SOME 
FORM OF REGULATej/ INTERACTION TO FORM AN ORGANIZED WHOLE. OR: 
COLLECTION OF OPERATIONS AND PROCEDURES, MEN AND MACHINES, BY 
WHICH AN ACTIVITY IS CA)irRIED ON. 




SYSTEMS ANALT$IS ' ( 

THE STUDY OF 'ARRANGEMENT'S OF TERMS OR ENTITIES MAKING UP A' 
SYSTEM, ESPECIALLY ARRANGEMENTS tHAT COMPOSE A LARGER AGGREGATE. 

/SYSTEMS PROGRAMMING' \ . 

^ THE DEVELOPMENT OF PROGRAMS WHICH FORM OPERATING SYSTEMS FOR 

COl^PUTERS* 'SUCH PROGRAMS INCLUDE COMPILERS, TRANSLATORS., MONI- 
TORS, GENERATORS* ETC. 

A • 

♦ 

TABLi / ♦ 

A COLLECTION OF DATA, EACH ITEM BEING UNIQUELY IDENTIFIED 
EITHER B3^><0ME LABEL OR BY ITS RELATIVE POSITION. 

TABULATE ' ' V ' ' 

I TO FORM DATA INTO A TABLE* OR 2 TO PRINT TOTALS. 

TAPE - ' 

' SEE MAGNETIC. TAPE. 
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TAP| TO CARDS ■ ' 

^Er^TAIN!,NG TO eQUiPMgNT OR METHODS THAT TRANSMIT DATA FROM 
EITHER MAGNETIC TAPE OR PUNCHED TAPE TO PUNCHED CARDS. 

TAPE UNIT ' ' 

A DEVICE CONTAINING A TAPg DRIVC, TTOGETHER WITH READING AND 
WRITING HEADS AND ASSOCIAtpo CONTROLS, 

\ 

TELEPROCESSING , ? 

A FORM OF INFORMATI^bN HANDLING IN WHICH A DATA PROCESSING^* 
SYSTEM UTILIZES COMMUNICATION FACILITIES. 

TEMPORARY STORAGE ^ 

IN PROGRAMMING»^S^ORAGE LOCATIONS RESERVED FOR INTERMEDIATE 
RESULTS, SYNONYMOUS WITH WORKING STORAGE, 



TERMINAL 

A POINT IN A SYSTEM^ OR COMMON I C^^T I CN NETWORK AT WHICH DATA 
CAN EITHER ENTER OR LEAVE; 



TESTING 

THE PROCESS FOLLOWING DEBUGGING OF A COMPUTER ROUTINE TO 
VERIFY THAT THE SOFTWARE AND/OR THE HAROW^ARE IS FUNCTIONING 
PROPERLY. 



TRANSCEI VI NG • , ^ 

PROCEOyRE INVOLVING THE SEn6i NG ANO/OR RECEIVING OF DATA 
V<IA A REMOTE TERMINAL. V 



TRANSLATE 

TO, CONVERT FROM ONE LANGUAGE TO ANOTHER LANGUAGE, E«G*'» FROM 
FORTRAN. TO MACHINE LANGUAGE, 

TELEMETERED EXPERIMENTAL DATA 

INFORMATION- WHICH HAS BEEN MEASURED AT 'A DISTANCE BY THE 
TRANSMISSION OF A SUITABLE SIGNAL BY TELEGRAPH, TELEPHONE* OR 
RADI€. 



TERMINAL UNIT ^ ^ 

A DEVICE, SUCH AS A KEY-DRIVEN OR VISUAL DISPLAY TERMINAL, 
WHICH CAN BE CONNECTED TO A COMPUTER OV-ER A COMMUNICATIONS 
CIRCUIT AND WHICH MAY BE USED FOR EITHER INPUT OR OUTPUT FROM. A 
LOCATION EITHER NEAR OR FAR REMOVED FROM THE COMPUTER, 
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THIN-FILM MEMORY 

A HEMORY etEMENT MAOr%Y 06P0SI TING MAGNETIC ALLOYS IN 
LAYERS SO THIN JfHAT OIR'ECT ION OP MAGN6T RATION CAN BE SWITCHED 
eXTREP^ELY RAPIDLY. 



Tlf«E SHARING 

A TECHNI que ALLOKlNGf pXECUTION OF TWO OR MORE FUNCTIONS 
ESSENTIALLY AT THE SAME TIME, BY ALLCKATING (IN ROTATION; >QR 

INSTANCE) SHALL DIVISIONS OF THE TOTAL TIME FOR THE^ PERFORMANCE 

OF EACH FUNCTIONo A SYSTEM BY WHICH SEVERAL XONSOL ES ARE CON- 
.NECTED Td" A LARGE CENTRAL COMPUl^R WHICH tS PROGRAMMED SO THAT, 

ON CALL, IT CAN GIVE SHORT BIJRSTS OF TIME INTERMITTENTLY TO EACH 

CONSOLE, 



TRANSDUCER 

A DEVICE WHICH CONVERTS ENERGY FROM ONE FORM TO ANOTHER, 
AS A HI-FI PICKUP CARTRIDGE CONV'ERTS MECHANICAL TO ELECTRICAL 
ENERGY* 



TUNNEL PI ODE • / 

f»He tUNN^L OIOOE IS A SPECIAL TYPE OF P-N JUNCTION DIODE. 
AS ONE INCREASES THE VOLTAGE ACROSS THIS OIOOE, THE CURRENT FIRST 
INCREASES AND THEN DECREASES, AND THEN INCREASES AGAIN, THE 
REGION WHERE THE CURRENT FALLS AS THE VOLTAGE RISES IS CALLED A 
"NEGATIVE-RESISTANCE" REGION. THIS NEGATIVE-RESISTANCE REGION 
GIVES THE OIOOE MANY PRACTICAL USES. THE NAME "TUNNEL OIOOE" - 
COMES FROM A QUANTUM MECHAJ\IICAL EFFECT ON WHICH THE OEVIC-E IS 
BASED. !N THE TUNNEL EFFECT IT^IS FOUND THAT THF WAVE NATURE OF 
ATOMIC PARTICLES SOMETIM^^S ENABLES THEM TO GET JO THE OTHER SIDE 
OF A BARRIER DESPITE THE FACf THAT THEY 00 NOT HAVE ENOUGH . 
ENERGY TO GET OVER THE TOP OF THE BARRLER. THE PROCESS IS ONE 
OF PENETRA'TION OF THE BARRIER AND HENCE THE NAME "TUNNEL EFFECT ,« 



TRANSISTOR ' 

A TRANSISTOR IS BASICALLY A DEVICE MADE BY ATTACHING THREE 
WIRES TO A SMALL WAPER OF SEMICONDUCTING MATERIAL. THE SEMI- 
COND^UC TING MAT ERJAL IS A SI^^GLE CRYSTAL WHICH HAS BEEN SPECIALLY 
TREATED SO THAT ITS PROPERTIES ARE DIFFERENT AT THE POINT 
WHfftE EACH OF THE WIRES IS ATTACHED. THE THREE WIRES ARE USUALLY 
CALLED THE EMITTER, BASE, AND COLLECTOR, AND THEY PERFORM FUNC- 
TIONS SIMILAR TO THOSE OF THE CATHODE, GRID, AND PLATE OF A 
VACUUM TUBE <IN THE SA<|E ORO^RI* THE TRANSISTOR IS USUALLY 
WIRED INTO A CIRCUIT IN SUCH .A "WAY THAT A SMALL CURRENT TO BE 
AMPLIFieO IS SENT INTO THE BASE AND'pROOUCES A CORRESPONDINGLY 
LARGER CURRENT IN THE COLLECTOR, 



TOPOLOGY 

A BRANCH OF MATHEMATICS CONCERNED WITH THE RELATIONS OF 
GECMETRIG FORMS WITHOUT REGARD TO THEIR SUE OR MFASUREo 
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TURN-AROUNO TIME 

BY AM^?LIl?fr!r«r'^^ eHTWEEhf THE SUBMISSION OF A COMPUTeR RUN 
BY AN INVESTIGATOR ANO THE RETURN TO HIM OF THE \RFSij| T<; np Tmp 

TrkvV'V.^'LV'l'^''^' oPERATior^ 0^ aTarge Vompute,? Tm^ 

INTERVAL -MAY BE f ROk AN HQU« TO MORE THAN A DAY. TWO OR THftPP 
HQURS IS USUALLY CONStOERBO io BE A SHORT TUR^'iROUN? ^^ME^ 

' * . ; 

TR-UTH' TABLE , ' 

A TABtE THAT DESCRIBES A LOGIC FUNCTION BY LISTINP Ail ' 

f . . ... 

UNOERFLOWV 

rffMPli?A?mr!?p. n? I*"^ CONDITION THAT ARISES WHEN A MACHINE 
iMrn^JJ Ml,ion°^ ^ NONZERO RESULT THAT IS SMALLER TH^N THE 
c\?A^\%'V™^^^^^ ''''' THE INTENDED UNIT OP STORAGE. IS 

UNIT 

ELEMEiJit/ ^^^^^^ ^f^^l^O A SPECIAL FUNCTION^ OR ? .A BASIC 

\ 

UNIT RECORD EQUIPMENT ^ 

ELECTROMECHANICAL MACHINES USED TO, PROCESS DATA RFfORnPn 

?n T^r'? ^^^^^ ^SEO AS INPUT/OUT?St OEV^JeS Sec?E0 

ro AN ELECTRONIC STOREO-PROGRAM COMPUTER. * ""^^ ii^tb LUNNECTED 

VARIABLE • ' 

A QUANTITY THAT CAN ASSUME ANY OF A GIVEN SET OF VALUES. 

« 

VERIFIER 

DATA SY^RElJmNG?^'''^'^ ^ ^^^^ ^''^^'^ INSCRIBING C 

VERIFY ' ' . ^ 

TO CHECK THE REStsJLTS OF KEYPUNCHING, 

# 

VARIABLES-CAPACITY DIODE 
WARM -START 

ONE OR MORE PROGRAMS STORED ON SPOOL PACK. 
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TO OetlveR DATA TO A MEDIUM. SUCH AS STORAGE* 



HQRD 

A SET OF CHARACTERS MHICH HAVE ONE /^OORESS ABIE, tOCAT ION 
AND ARE TREATED AS ONE UNIT* 



WORD SIZE 

THE NUMBER OF CHARACTERS IN A WORD, SYNONOMOU.S WITH "WORD 
LENGTH." 



( 
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APPEtJDIX III ' 
\ • - 

Running a (^ATFIV Job on the \m System/36Q 

Model 65 User Terminal . . . . 

J 

Section' A of this appendix contains a self "guided tour of 
the University Computer Center facilities. SoGtlon B describes 

v _ _. .. . _ 

the control cards that are used forerunning WATFIV jobs. A pro- 
cedure for actuaflly running a job Is ^Iven in Section C. 
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< 

' ■ ' V/^ Section A . ' 

Tile University Computer Cen^ter Facliltilfe 

You need to know your way around the University CompuCer 
Center before you attempt to run any jobs on the computer. The 
following pages cbntain.a map and a guide to the user area of th© 
Computer Center' in the basement of the Mathematical Sciences Build- 
ing, Take the self-guided 'tour, referring to the map and the guide 
following the map. 



Map .of the University Computer Center, MS Basement 




S 



.Guide to the Map of the University Computer Center, MS Ba8©m<^t 



Tl\© numbers below correspond to the numbers on tha map of the MS 
basement. Start at "1" and check off each item as you go. 

4 ' 

'J^is Is the supervisor*© of rice. Report anV malfunctions 

or difficulties with any equipment (keypunch maqhines. 
card reader, line printer, etc.) to the supervisor. 

2. The console with the blinking lights is part of the cen- 
tral, processing unit (iSpu) of. the' IBM System/ 360 Model 
65 computer. This unjlt^ls the hfeart of the computing 
system. BeMnd the console is the memory unit, contain- 
ing 1,572,864 addressable storage locations (or bytes) . 

\ , 

In the foreground along the wall to your left and to 
your right is a lin^' of disc drive units (du) for storing 
and retrieving information using magjuetlc discs. (You 
will probably see some 'disc pack covers sitting around 
the area. They look- like plastic cake containers.) 

Tq the right and in front of the central processing unit 
is a line of magnetic tape drive<^units (tu) ftor storlrig 
and retrieving infarmation. (Data transfer with magndtic 
tape units is aiow©r than with disc units by several or- 
ders of magnitude . ) 

^ Mo%t of the other units In the rodm are control units 

for the various input/output devices. 

3. ' this rQom contains the uset terminal of the computer. 

..^ This aired, like all other areas, must be kept clean, 
Count the number of x/aste containers In this rooaj. 



¥ind the ^ame of this wit on the nameplste. 



•0 > 



Acquaint yoursqlf ,wlth any signs and instruct ions taped 
to feh6 ^machine.- You will need them later. 

Fin4 two sets of *'START" and !'STDP" buttons. . ' • ^ 



5» „...,^ Please read ^and observe the "No Smoking" sign pn the wall. 
^^^^ name, of this unit on the nameplate. ' ^ 



^ * • ^ Acquaint yourself with m\y signo md Instructions taped 

• to this jnachine. You will n^ed them later. 

, ^ ' • ■ ' 

. ' Locate the "END. OF FILE" and "STAUT" Suttons. ' 

y • . • . • , ; > , 

^ ^* .. • , On tl^e wall are the Inatructlona for usiiig the c^rd • 

^ deader. At the time-^wheii ypu are rfeady to"\!se the 

^ ' card reader, read thes^ directions carefully. 

^ ^ Along this wall is the input/output area for jobs that 

^ are run "in&ide'^ on the computer by an operator. Jpbs 

* • are submitted at 'the window to your left and are plck- 

. fJ^om the bins. Yoii wm 'be u^ 

In thla course . ~~~~ 

^* , — ^ I"^ the window- where jobs are submitted is a tray con- 
taining control cardfe for gunning jobs on the computer. 
The only control cards you will need for this course' 
arfe $JOB, $ ENTRY, and $IBSYS, some of which should be 
available in the tray.. (You don't need to take the 
.cards now. ) 



\ 



_ At the back the tray is a supply of rubber bands 

for putting around decki^ 6f com|)uter cards. ' . 

/~ . ■ ■■ 

— ____ Just to the right and above the, window is a button for 
calling an operator tfhenevar you need to report diffi- 
cult; ies with equipment. 

»»_ "^^iis is a cathode ray tube (CRT) display unit, that shows 
the status of jobs being run the computer.' You will 
not need to u^e Uiie unit in tljJLs course, but it's sort 
of fun to watdrr . ' 

.... Beside. th6 CRT unit is a bin of OMR cards (computer cards 
that can be marked with a pencil). 

These are work areas'for your^ convenience. PLEASE! KEEP 
THESE AREAS CLlEANl 

A diagnostic lab is operated in this area for students 
enrolled in basic computer sxiienee programming courses. 
Tills Service provides help for you when you do not under- 
stand diagnostic messages on your computer output* - 

_ T'^i^ i9 the user keypunch area. How many waste coatainera 
can you find in this room? PLEASE USE THEMt KEEP 

THIS AREA CLEAJ^I "~~ * 

'Please read and observe the "No' Smoking, No Drinks" ^Ign. 

^« ^^^^ S»^ey keypunch machines are model Z6 machines 



They are used primarily by students enrolled in COMSC 2X12. 
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The light grey keypunches are model 29 machlnea. 



Please read and observe the instructions taped to 
some of th© desk tops of the machines. PLEASE CLEAN' 
UP YOUR MESST ' 

Notice the card bins containing blank (unpunched) com-- 
putar cards placed among the keypunch machines. 

This room contains unit record equipment, which you 
will not need for this course. 

There are keypunches for making corrections only located 
here for your convenience. 

Notice that there is a time limit on the use of these 
machines y which must be observed. 

You're on your own to find your way out* 
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Section B T 
WATFIV Control Cards 

Tliree control cards are required forvall WATFiv^bs : $jqp, 
$ENTRY, and $IBSirS. ^ 

Thfe $JOB card initiates the accounting routine "used by th^ 
Computer Center for charges and records; it also initiates the 
compile phas€ durltig which tira©^ the Fortran program is eompiled 
or txii^dlatad. 

tlie general form for the $j6b catd that you need for this 
course is shown below : , 

s 

$JOB wwv,xxx~3ry-a2:a;2! Your rfame 

wvw -* the project number assigned to this course by the 
Computer Center ^^ised for accounting purposes, 
• xxx»yy~aaa56 ~ an assigned identification number used for 
the keeping of records in the course. 
Your nam^ must be preceded by at; least one bl^ank. 

_^ ' 

Th4 $JOB card shown above is used with jobs that are punched 
ott model 29 keypunch ma(&hines. If you use a model 26 keypunch, 
then the general form of the $JOB card Includes a Kf parameter: 

$JOB vww,XKx-yy'-2KZ2,»;P«026 Your name 

Th0 $JOB card may contain additional parameters and options 
iMat are beyond* the a cope o^ this course * Refer to the section 
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titled^WATFIV Job Card" In APPENDIX VIII If you need more Infor- 
mation. ~ ' 

The $ENTRY card initiates th© e;c©cution phase of th© job 
during which tim© the inetructioiis generated by the compiler ar© 

r 

executed. The control information, $ENTRYi is punched in columns 
\ 

1-6, of the car-d. 

The $IBSYS card terminates the job, recording thfi necessary 

_ ^ ^ ^ _ _ " . . 

accounting infomation. I'he control information, $.XBSYS, is 
punched in columns ^1-6 of the card . 

Place your cards in the following ordcsr when you run a job: 
" $JOB - . 

Program deck 



$ ENTRY 



Data cards, if any 



$IBSYS 
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Section C 
Rurmlng a WATFIV Jdb 

Now that you know your way abound, try running a job oil the 

y®®]?" t®¥T?iMl_ in ^Ppm^ QlO • * 

^ 1. Take your punched program deck and place th© proper con- 
trol cards with the program deck as described in Section 
B. 

2. Read the sign "Instructions for Using Card Reader" on the 
wall In room 010. ^ . 

3. Read the Instructions attached to the card reader. 

4. In your mind go through a dry run of putting your cards 
onto the card reader and starting it» but don't do an 

^ actual run yet* 

5. Read "Additional Itilst ructions for Operating the IBM 2501 
Card Reader" contained in APPENDIX IV, * 

6. Read "Instructions for Using the IBM 1403 Printer" con- 

» 

gained in APPEIJ^IX V. s 

7. Onc«(>.more referring to the sign on the wall, try running 
your job on the card reader, and ^et your output from the 
line printer. 

8. Be sure that you pick up your decfe (Careful I Not someone 
else's!) from the card reader. 

9\ Move out! Don't loiter in th© terminal rtoom. 

XIX»9 . o •< 



f 
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APPENDIX IV 

Additional Instructions for Operating tha IBM 2501 Card Reader 



The control pan^l of th© card reader contains several lights and 
buttons. The top row contains signal lights and the bottom row 
contains: push buttons* 



VALIDITY 




Wm OF 




READ 




READY 




FEM) 




POWER 


CHECK • 




FILE 




CHECK 




(green) 




CHECK 




ON 


(yellow) 




(yellow) 




(yellow) 








(yellow) 

^. — J.-. ^ 




(white) 
















OMR CHECK 




END OF 
















(yellow) 




FILE 




8TARX 




NPRO 




. STOP 




UNDEFINED 




(blue) 




(green) 




(blue) 




(red)^ 



Tha following three lights indicate normal operating conditions. 
1% The whit© POWER ON light indicates that the machine is on.^ v 
2. 



The green READY light will be on when the reader is reading 
cards and everything is "gb^" Even though the reader may 
©top, as long as the READY light is on, it is still "go." 
The reader is probably vaiting for thoi computer or the line 
printer if it stops in the READY condition* * 

3e The yellow END^r FILE light comes on whenever the END OF FILE 
button is pushed and goes off whenever the READY light goes 
off. This light signals that the last card^hrough the reader 
will be put into the stacker; otherwise, the last card will 
remain inside the reader. 

tfte following four lights indicate abnormal conditions which cause 
card reader to stop. ' 




The yellow Vi 
an 'invalid put 



fch. 



^HECK light signals that a card contains 
liter e jgire at least three comtnon causes x 



a. one or Wr^ cards placed upside Apim. or backward in the 
Im^ hopper J 



a card with more than one character punched in a column 
of the card} 1 
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c. a card punched off centor. 



2. Th® yellow READ CHECK light Indicates that the card was mis- 
read. Each card is read »twlc© by the card readjs*^, and the 

two readings are coraparad. If they are not Identical, a "read' 
check" stoppage occurs. Usually this condition is caused by 
foreign matter Insidis the holes of the card or inside the 
machine Itself, but may alao be caused by a defective card. ' 

3. The yellow FEED CHECK light indicates a problem in the card 
handling mechanism.. Usually this condition is caused by a 
bad card, especially a card with a blunted bottom edge (the 
9~edge) or a card that is not flat. 

4. The yellow om CHECK light indicates an invalid OMR card. 
This Condition should not occur if you use the OMR cards pro- 
vide^ by the Computer Center, but it could occur if the OMR 
feature is not functioning properly. The UNDEFINED light is 
disconnected and should never come on. 

The buttons on the bottom row of the control, panel control the 
operation of the card reader. 

1. END OF FILE (blue) must be pushed In order for the last card 
processed by the reader to be ejected into the stacker. Other- 
wise, the last card remains inside the reader . Always push 
^ this button whenever you are using the card , reader. (If you 
"lose" your $IBSYS card in the card reader, you forgot to 
push the END OF FILE button-l ) 

SXpsT^green) must be pushed in order for the reader to operate, 
"ushing this button causes the READY light to come on, assuming 
that operation is normal. 

NPRO (blue) 1© used for ejecting cards from inside the reader 
without processing them. This button is used primarily when- 
ever ah abnormal stoppage occurs (indicated by a FEED CHECK, OMR CHECK 
. READ CHECK, or VALIDITY CUm, light) for getting cards out of 
■ the reader and into the stacker. This button is not functional 
if cards are in the feed hopper or if the STOP button has not 
been pushed. 

4. "^STOP (red) is used for stopping the operatioiJk of the card reader 
and for releasing the reader from the controp of the computer. 




ERIC 



IV, 2 



32/1 



\mt TO IDO IN CASE OF STOPPAGE OF CARD READER 



READY 



Cheek th« PRINT RpDX light on th« lln» printer . If th« light is off , 
push the line ££int«t START button. 

W«lt\ Op«rat*pn should reeum® !nOtt»«»ntarlly. 

If operation doea not r«i8um©» then ther« may b« a problam in th« 
coa>put«r •yet«m. You may wish to rernov* your d«ck and return 
later. 



How to' reroov© your deck from th© readftr 



Push STOP. 



Remove ca'rde from the feed hopper <or juat lift up on the 
cards and hold them above the bottom of the hopper). 

Push and hold NPRO momentarily until all cards have been 
ejected into the stacker. ^ \ 

Remove your cards from the stacker (and from the feed' hopper » 
if you have not done eo). 



VALIDITY 
CHECK 



The last card ejected into the stacker Hf^i^e otoppage is the 
offending card. i 

Is the offending card backward or upside down? 

NO. Remove your ^eck from the reader using the instructions 

above under "READY." Check the card for an invalid punch 
{usually more than one character punched in a column of 
the card) and for off center punches. Repunch the card 
and try ag,^in. , 

YES. You can recycle the card through the reader as follows: ' 

V STOP. - . • " ^ . 

Lift up and hold the cards in the feed hopper. 

IPush and hold NPRO momentarily until all cards have been 
ejected into the stacker. 

Take the offending card and t:he ejected cards and place 
them properly in the feed hopper under the caifds you 
arie holding up . 

Be eur* that the cards in the hopper ere straight and 
r ii««tly stacked; then pUfth START. 
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14|;ht: on 


** 

Proc^dur© 

' ■■ ^ — — ■ ' ■■ — " — - — ' — "" i ' ■ -^^^ " '■ ■ ■'■ — ' ■ ■ .i . --^ • — 


CHECK 


Th^ Imt card ejected iatg the stacker before stoppage is the 
^ offending card« Recycle the card through th^'reada^ as follows: 

V 

Push STOP. . • ♦ . . 
Lift up and hold the cards in the feed hopper. 

Push and hold NPRO momentarily until all cards have beaA ejected 
into the stacker. . . 

Tako the offending card and tha ejected cards and place them 
properly in the feed hopper under the cards you are holding 

■- ">■•- -i - - - - - - - - 

Be sure that thfe carjls in the hopper aro» straight and neatly 
stacked; then push START, 

If read check occurs again > remove your cards usinR the instructions 
under^READY" above > repunch the offending cardj, and try again* 

• 


FEED 
CHECK 

« 


^ The bottom card in the feed hopper is probably the offending card. 

V 

Is the weight on the cards in they feed hopper? 

NO. Inspect your cards in the hopper for damage* If they are 
0K> place cfeirds and weight properly into the feed hopper, 
and push START* 

, YES. Probably one ok; more of your cards in the feed hopper have 
blunt bottom edges or are not flat. Remove your cards from 
the reader using the^ instructions under "READY" above. Re- 
pundi damaged cards. ^« (Sometimes you can repair blunt edges 
by placing the capd on a flat surface and running the flat 
side of your thumbnail along the edges; the repair job is 
only temporary, however.) 

Sjpra© times a feed check means a "card jam inside the reader. In 
such cases, secure the help of the Opet^ions Supervisor (MS ll2A) 
or an operator from the Computer Room* 


OMR ' 
. CHECK 


. _ ^ _____ ^ 

Proceed ©XiSctly as in the case of a READ CHECK, replace the offend-- 
Ing CttlR card with a new one. If the condition prevails^ report 
It to m operator or to the supervisor. 

. ^ ' "-\ 




Wh^n all else fails secure helt> from* the Operations Sunerviftor • 
(MS 12A) or an operator from the Computer Room. DO NOT ATTEMPT 
■TOIOPAlRmMCnOHlNOEQUaM^ ■. 
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Xaitnsotiojaft for Using th® IBM X403 Prlat«t 



Ti^® control psa«l for the 1403 Prlater is on th« froat « 
hand corner. There arft seven push button© and five aiga»l 



' in the upper lef ft- 
lighte. ^ 



START 
(green) 


CHECK 
..RESET ' 
(blue) 

i 11 - ain- 1 ■ "1 1 -'i 


STOP 
(red) 


SPACE 
(blue) 


CABiOAGE 
RESTORE 
(blue) . 


CYCLE 
(blue) 



PRINT 
READY 



F 



TORMS 
CHECK 



PRINT 
CHECK 

-SYNC 
CHECK 



CARRIAGE 
STOP 
(red) 



The only buttons with which yob will be concerned are START » STOP, and CARRIAGE 

RESTORE. , 

i . 

The $reen START buttoh (there is also one* on the back side in the upper right- 
hand comer) pute the printer in t^e "ready" state and turno on the white PRINT 
READY light. The line printer must b€^ "ready" in order for It to operate and 
in order for the card reader to function. . 

The red STOP button (there is also one on th<? back side in the upper right-hand 
(lomer) etope the operation of. th^ printer arid releases it from the control of 
the computer. (Pushing th«( STOP button will usually also cause a normal, tem- 
porary stoppage of the card reader.) 

The blue CARRIAGE RESTORE button causes the top of a new page of paper to be 
positioned in the print position, ^ia button is not functional until the 
STOP button is pushed. 

The END OF FORMS, FORMS CHECK, PRINT CHECK, and SYNC CHECK lights indicate ab- 
normaXv^ conditions and cause sto.ppage of the printer.' Secure the help of the 
Operatione Supervisor (MS 12A) or an operator in the computer room if one of . 
these lights comes on. DO NOT ATTEMPT TO "FIX" THE EQUIPMEJIT. 

How To Ose The Line Printer' • 

!• Check the PRINT READY light. If it is not on, push the START button. 

j^bs bihiiid yourf , wait until your output come* into view at the top on the 
b«ok tide 0£ the printer. Start a tear on one end of the perforation at the 
bottom 0i your lest page , and then pull down on the paper sharply at a slight 
Angle. The paper «|iould tear cleanly if you do this ^^i<^|^ly » 
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HbHI ££ia£££ i£ iiaiSliSi ^Ith your job and no othjr p^opl^ ftga ruanlgg 
42J^ fesbiai 5:2H£® • than pusih STOP, push CARRIAGE RESYQRE thgoe tiroeii only 
(mor« tlm«e Just w«at« pap«r uim«c«s»arlly) , and £ush START. The last pag« 
of your output will than b« n««r the top on tha back aid© of the printer. 
Th<an atart a t«ar on on« end of the perforation at bottom of your l^at p^ige, 
and th«n pull dovm on tha paper sharply at a alight angle. The paper ohould 
tear cleanly if you do this quickly . 

is. 5J£SX5. ^^^"^ eagicr to tear the paper when It is near the t0£ of the * 
printer on the back side,. You can alao do it nwre quickly near the~top7~ 
Sometimes however, circumstance© beyond your control require that you tear 
it off at the bottom of the printer; but ordinarily you can tear the paper 
near the top even though the printer is running. 
» 

If it become© necessary to atop the printer while you are tearing off your 
output or for some other reason, then push the STOP button, correct the- 
difficulty, and then push START. 
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APPENDIX VI 



How to Get an 80/80 Listing With the 
Sy8t©m/360 User Terminal 



The 80/80 listing feature of the User Tet^minal produces a 
listing of pundi@d_or OM carda. on th© Xina-.print_^r_. .._Ihi©_'^^^^ _ 
convenient way of checking cards for errors or ioi Just reading 

s » 

what is punched or marked. 

Two control cards are required: 

123456789 ► ' 

$LIST 

$ENDLIST 

Place the $LXST card in front' of the cards to be listed » and place 

\ 

the $ENDLIST card behind the cards to be listied. Be aure to^ include 
the $ENDLIST card; if you omit it, the termlnlal will remain in the 
list mode. " * \ 

Usually there are $LIST and $ENDLIST caMs in the card box 
beside the card reader or in the tray of contrbl cards In the window 
where Jobs are submitted. Replace the cards when you finish with 
them^ If they are not available* then punch yc^ur own. It's better 
to^ punch them on the back side of the cards so i:hat you can more 
easily Identify your deck after it goes through the card reader by 
the top left corner of the two cards, $ince the top left corner la 
cut ott the rest of the cards. ' 
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APPENDIX VI r * 
Running Fortran Jobs on the im 1130 Computar 

t 

paction A of this appendix describes the control cards neadad 
for 1130 Fortran jobs without user supplied subprograms. Use of 
FUNCTION and SUBROUTINE subprograms requires additional control cards 
which are described in Section B. 

, The 1130 ^:oraputer is located in room MS 214. Normally the 
machine will be on, but occasionally you may find it off. If the 
machine la off, then you must "power up" and perform a "cold^tart." 
Section C tells you how to do this. If the machine is already on, 

th^n refer to Section D for Instructions. 

i ' , • 

I, Section E outlines some major differences between 1130 Fortran 

ani WATFIV. 

Section F gives the error codes used with the 1130 Fortran 
compiler « 
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Section A 
Control Garden 



In order to run a Fortran job on the IBM 1130, the following 
control card setup is used. 

111111111122222222223333333333A44444^M^5 
12345678901234567890123456789012345678901234567890123456789012345678901234567890 
// JOB (or a "cold start*' ^ard, if doing a col^ start) 
// FOR . 
*I0C8 (CARD .TYPEWRITER) 
*LIST SOURCE PROGRAM , 

1 ' 

/ Fortran source deck 

// XEQ 

1 

Data cards. If any 

Q^e or two blank cards 

The // JOB card prepar^is th© cpmputar for racelvlng and irnnnlng 
a job* (It may be replaced by a "cold start" card when the cold start 
.procedure Is performed.) - 

The, // FOR card loads the Fortran compiler and initiates the com- 
pile phase. 

The *IOCS and »^LIST SOURCE PROGRAM cards are control cards for 
the Fortran compiler. The ^^loCS card prepares the computer to receive 
input from the card reader (logical unit number 2) and to put output 
on the typewriter/printer (logical unit number 1). The *LIST SOURCE 
, PROGRAM card produces a listing of the program as it is compiled on 
the typewriter/printer. If you choose not to have a listings this card 
.may be omitted » greatly speeding up the compile phase ♦ 

The // XEQ card initiates the execution phase* 

Since the card reader does not have an MD OF FILE feature for 
reading the last card of the^ deck and ejecting it into the receiving 
hopper I one blank card insures that the last^ card of the deck will be 
readji but it will remain inside the card reader. Tto^o blank cards will 
insure that the last card will be ejected into the hopper % 

See Section B for information on control cards for runsiixig joba 
with SUMOUTINE or FUNCTION subprograms • 



Section Br 
^ Using Subpr<?grams 

On the 1130, subprograms must b© compiled and stor^ on the disc 
be:?ore'^th©y can be called and used in the main program. For that rea- 
son, FUNCTION and SUBROUTINE subprograms iijust be placed before the main 
program in the program deck. Special control cards are also required. 
Thig setup of control cards and source decks is sljown below. 



111111111122222222223333333333A4444444445555555555666666666677777777778 
12345678901234567890123456789012345678901234567890123456789012345678901234567890 
// JOB T f 
n FOR j 
*LISTvSOURCE PROGRAM 



// DUP 

*STORE WS UA Name 

// FOR 

*IOCS (CARD , TYPK7RITER) 
*LIST SOURCE PROGRAM 



// XEQ 



On© or two blank cards 



I Subprogram'"'source deck 



Main prdgram source deck 



Data cards, if any 



The "T" on the // JOfi card is necessary so that the storing of 
the subprograms on the disc will be temporary. If the "T" is omitted, 
then the subprograms will be stored permanently on th$ disc. ' 

The *STORE card moves the compiled program from the w<?rk storage 
area (WS) of the disc to the user area (UA). The name of the subpro- 
gram must be punched beginning in column 21. (This is the same name 
used in the FUNCTION or SUBROUTINE statement, of course, and is not 
necessarily "Name" as shown on the card.) 

If you have mora than one subprogram, then, set up . control cards 
for each subprogram separately, as shown <m the next page. 



// FOR s 

*LIST SOURC^WOGRim 



J Subprogram source deck 



// DUP 

*8T0RE WS UA Nma© 



Remember to place all subprograms bafore the main program. 

Run j bbs in the U8ual~way » using ins t rue t ions in Se ct ion C or Sec- 
tion D. 

For additional information oi| control cards,, see Section A. 



•f- 




I 

Section C ' / 

y ' 

J Power Up and Cold Start 

£HS®^E£. ii 12 M il gpMuter la off ^-th^at is, 

Mitt jSS®. ^^IjFF p68ltioo and tthe POWBR ON light 

^ .^ilsS^^®! ii ~^ — — . — 

1. Power up. ^ 

a. The POWER switch ie on the operator's console In the 
^ upper right-hand comer. Position the ewlteh to ON. 

Th© POX-JER ON light on the card reader should now be 
on. 

b. Open the door on the disc drive unit below and to the 
. right of the. console. (The entlrer front of the cabinet 

opens.) Find a switch labeled FILE. Move the switch 
to ON. ^ 

^* about 2 minutes, or until you hear a loud click, 

the computer should be ready for the start-up procedure 
then. 

d. Check the green FILE READY light above and to the left 
* of the console keyboard. It should be' on. If it isn't, 
get help, 

2. Ready the c^rd reader, - 

■ ■ \ 

a. Make sure that the card feed hopper on the card reader 
is empty. 

b. Push and hold momeatarily the NPRO button on the reader; 
this will remove any cards that may be Inside the reader, 

c. Place the properr control cards with your program (see 
Section A), and place a "cold start" card in place of 
the // JOB card, (There should be a cold, start card In 
the box sitting on the card reader. If you are using a 
// JOB T card, place the cold start card ^ fyp^t of it.) 

d. Put your card deck into the card "feed hopper, 9-edge 
way from you, face down, and push the. START button on 
th© card reader. The green READY light on the card 

. reader should now be on* 

I ■ ' ' 

f 3, Run the job. 



5V 



&. Push the PROGRAM SXOP button on the console • 
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b. Push th® im STOP button on the coasol©. 

1 

c. PuBh the RE3ET button on the console. 

d. Push th© PROGR/m LOAD button on the consolfe. 



©, Check the green RUN light on th© consol©; it should 
b© on, and th© coinputer should be operating. If it 
Isn't, find help. 

f . At th©~cdnclu8l6n of th^^^ run , clear tli© card reMer". 
Clear th© feed hopper and preas and hold momentarily 
the NPRO button to eject th© laet two carda ^at are 
Inside the reader. ' 



r 
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Section D 



Running Jobs Wlian the Computer le ON 

JB£2£®tei ii t£ i£ asM If. ifee coaster i£* on — 
ii» ^ MIE ^VAtch is in 1^ M position^ the PQWBR mi Ujght 
JSa iki. .aaEi i£M®£ ii 2a» «Hi ill® ZL^B RBAPY Xlght th® consola Is 



on. 



1. Check the KB SELECT light on the left aide of the console 
keyboard. If the light is on» then you must do the follow- 
ing before you can enter a job through the card reader: 

a. Uaing the keyboard, s,tartlng at the left margin, type 

//bJOB 

where "b" represents a blank. 

b. Push the EOF (end of file) button on the keyboard. 

c. » Then type, starting at the left margin,- 

//bXEMD 

where %" represents a blank. 

d. Push the EOF button on the keyboard again. * 

a. Check the KB SELECT light. It should be off. If not, 
- you probably didn't type the Instructions correctly. " 
^ ^ Go back to step a and repeat the instructions carefully, 

2. Ready the card reader. ----- 

a. Be sure that the card feed hopper is empty, 

p- 

b. Push and hol<;l momentarily the NPRO button on the card 
reader to retnove any cards that may be left inside the 
reader. 

c. Place th« proper control cards with your program deck 
(see Section A), 

d. Place your cards into the card feed hopper, 9-©dge away 
from you, faj:e down, 
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e. Push START on th® card reader. 

f. Check th© READY light on th© reader.^ It should be on. 
If not, try again or ask for help. 

Run th© Job. • i 

a. Push PROGRA^^ "START on the consol©. 

b. Check tho green RUN light on th© console. It should be 
on. If it la not, th©n either your control cards are in- 
correct or els© you need to use a "cold start" card. Re- 
move your cards from the feed hopper, and press and hold 
momentarily the iJJPRO button to eject th© car_ds that are 
Inside the "reaaer. Check your control carda. If they 
are correct then go to Section C. step 2c, and proceed 
to the end of Section C. 

4 

♦ 

c. At the conclusion of due run, clear the card reader. 
Clear the feed hopper and push and hold momentarily the 
NPRO button to eject the last two cards that are Inside 
the card reader. 



Section £ 

1130 Fortraa Compared to WAXFIV ' 

This list l8 far from ©xhaustiv©, baing Intendttd only to help 

you ov4ir sosie major hurdles % 

V 

ij. Letigth of variable naJBies^ ______ _ _ _ ' 



WATFIV: Maximum 6 ciiaracters* 
1130: Maacimum 5 characters • 



2. Logical IF and logical data* 

MXFIVs Logical capability available. 
1130: No logical capability available^ 

3. Alphameric or character data (single pri^cision)^ 

WAT?IV: Maximum of 4 characters associated with a variable 
nam6ii 

1130: Maximum of 4 characters associated with a >real 

variable name; maximum of 2 characters associated with 
an integer variable name. 

4. Input /output unit numbers* * ^ 

WATFIV: Line printer, 6; card reader, 

1130: Typewriter /printer > 1;* card reader 2o 



For compatibility between WATFIV and 1130 Fortran, use of 
variable I/O unit ntimbers is especially convenient. The program 
aegxaents b^low illustrate this. 

i 

C RUN ON WATFIV " C RUN ON 1130 

IN^-S XN"2 
IOUT-6 I0UT"1 
READ(IN,4)A IUEA1)(1N,4)A 
miTE(I0UT»5)A WRITE<I0UT,5)A n 

A sii\$le DATA initialiisatlon statement may be used for iiaitiallz* 
ing both, unit numb.ers. • . ' 
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RUN ON WATFXV 

DATA IN,IOUT/3,6/ 

READ(IN,4)A 

WRITE(IQyT,5)A 



RUN ON 1130 

DATA IN,I0UT/2,1/ 

RIAD(IN»4)A 

WRITE(I0UTp5)A. 



5, Carriage controls. 



WATFIV: 
1130: 



Blank, zero, "f, 1, and /, 

No carriage controls except /, Other carriage 
controls, if present, ar© simply printed, ias any 
other character fields would be. 



For example, below are two program segments illustrating what 
output is produced by each system. 

C WATFIV C 1130 



• • • 



WRITE (6,1) 
. 1 F0RMAT(7HO0UTPUT) 

• • % 

$ENTRY 
OUTPUT 



WRITE<1,1) * 
1 F0RMAT(7HO0UTPUT) 



// XEQ 
O0UTPUT 



* • • 



Compatability between the two systems' in the examples above can 
be achieved by using a / to get double spacing, as shown belo^ 



C WATFIV 



WRITE (6,1) 
1 F0RMAT(/7H 0UTPUT) 



• • • 



$ENTRY 
0UTPUT 



C 1130 



• • t 



WRITE(1,1) 
1 F0RMAT(/7H 0UTPUT) 



// XEQ 
0UXPUT 



r't- 

Notice that tfee blank carriage control is "printed" on t& li3p 
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6» Variable dimensions In Bubprograms* * 

WAXFIVj Variable dimensions are permitted and recommended ♦ 
- 1130 J Ho variable dimensions are permitted. In general > 

using the same dimension in the main program and 

the subprogram la recommended i. 
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7. Rounding of output. 

WATFIV: Real numbers are rouftded on output. 

1130: Real numbers ar© not rounded, but are truncated 
output. ' 

T^i© program segments below lllustrat© this. 



C WATFIV 

X-3.6789 
WRITE(6,1)X 
"1 FORMAT (IH ,FA.2) 

$ENTRY 
3.68 



C 1130 

WRITE(1,1)X 
.1 FORMATdH ,F4.2) 



// XEQ 
3.67 
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3©ctlon F 
Error Codas 
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Hi© Oi*x'orcbdci^ listed bolow pro for the UOO 
■Olsk Monitoc Syatcm, Version 2. tlic 1800 
.vluUiprogi amming ExetAillv c Operating System 
:MPX), and tho 1800 Ttmo-Sharing Exocutlvo 
Dporating Sy5«lt*m (TSX). Most of the error codes 
iro the aniuc fur nil thrco systems; whoro thoy 
iiffor in mooning, a scpot-atc definition ta supplied 
■or th© system that Is dtrferont from the otheVs. 
-in tho tabic bolow. DM2 stands for the 



1130 Disk Monitor Systom, MPX for tho 1500 
MuUlprbgrammfng Exocutlvif sy^lom, and .Tsx 
for tho 1600 Tlmo-Sharing Executive syatrv , 
Somo of t}\h errors aro caused by errors ;oi troi 
atatemcnts. For an explanation of these 
«tatOmentS| refer to tho appropriate manual: fm 

Programming and Operator's Guide, Form 
C20-371?; for MPX Progranuncr^a Guide, Form 
C20-3720; for TSX-Conccpts and Teclmlquos. Form 
C26-3703. 



"Error 



C04 
C0§ 
-06 



mi 

COS 

coo 

CIO 
C11 
CI 2 
CI 3 
C14 

CIS 
016 
C\7 
C\B 

Cid 
C20 

^1 



Cause of Error 



Nor> nyn\orlc choractor In stotcrnont number. 

More than five conilnuptfSn earth, or continuation card out of 

Syntax error in CALL lir4K or CALL tXIT stalQment, or. In 
TS>i.CALL LINK or CALL EXIT in process program. 

u'ndotcrniifwblft, misjpoUcd, or incof rcclly formed itotoment. 

Stotomont out of soqu<JMce. 

• 

Stutcmont followlrg STOP. RFTURN, CALL LINK, CALL 
EXIT, GO TO, or IF *!dtemi.(n does rot havo » statttmont 
number, or. in MPX or TSX. MPX of 5 SX CALL statement 
not ha ;0 is $l3tom«»nt numbsr. 

Name longyr tf^^n U^o characters, or name not starting with 
tt% atphabetlc cburaotor. ^ 

tncorrect or missing subscript within dimension information 
(DIMENSION, COMiYON, REAL, or INTEGER). 

Duplicate stait)menl number. 

Syntax error In COMMON stotomenc. 

Oupllcdtu noma in C0\1«M0iM staiomcot. 

Syntijx orrof in UNCTION or SUBROUTINE statement. 

p^r:imotef (dummy JifQument) appOarj in COMMON mtoment. 

N3me oppeori tv:lc8 »s a poramatcr in SUBROUTINE or 

FUNCTION staicmontx 

DM2 and TSX: MOCS control sloten^ont in a subprogram, 

S/ntdH «rror In DIMENSION stDt«mm>t. * 

Subprogram namo In DIME^NSlON stotcrncnt. 

Namddlnneftslaatid fiiocfi thao.O'^cerOr not dimeniioned on 
Unt appearance of name. 

Syntax error In REAL, INTEOeR, or Exf ERNAl statement. 

Subprogram namo in REAL or INTEGER stat^ment^ or, In 

i INUNCTION subprograrj cor^tainlng Its own nam In 
an EXTERNAL it^^^omenL 

N^me in EXT£B^!AL .thit It also In a COMMON or 
OlM^NSlOPUt^tiiTcnt, . ., „; „„.,,, >,_^.,„-,„.,, 



Error 
Code 



Oduse of Error 



C22 
C23 
C24 
C25 

C26 
C27 
C28 
C29 

C30 



C31 
C3? 
C33 
C34 
C35 



C36 

C37 
C38 
C39, 
C40 



IFIX or FLOAT In EXTERNAL statomont 
Invalid real constant. 
Invalid Integer constant. 

f^/loro than JI5 dummy arguments, or dupllcito dumny 
argument In statement function argument llu. 
Right parcnthejis missing from o subscript cxpros:i?on. 
Syntax error In FORMAT stattsmonf. 
FORMAT statement without statement number. 

0M2 end TSX: Field width specification greater iUm 140 
columns. MPX: Field width specification grcator than 153 
columns. 

In « FORMAT statement specifying E or F conversion, \v 
greater than 127, d greater than 31, or d gica'ter t*^2n w, v>iora 
W is on unsigned Integer constant specifying the totdl field 
length of xi\e data, and d Is an unsigned integer constant 
specifying tho number of decimal placw to the ri^ht of U>e 
decimal point. 

Subscript error in EQUIVALENCE statement. 

Subscripted variable In a statement function. 

Incorrectly formed subscript expression. 

Undefined variable In subscript expression. 

0M2: Number of subscripts In a subscript expression, and 'or 

the range of the subscrlpt(s) does not agree v/lth the dir.^cnsion 

information. fvlPX end TSX: Number of subscripts In a 

subscript OHpresiion does not agree v^lth the dimension 

Information. 

InveJW. arithmetic stoti^ment or variable; or. In a FuriCTION 
subprogram, the left side of on arithmetic statement Is a 
dummy argument, or, In 0M2 end TSX, Is in CO.vr/.ON. 

Syntax error In IF itatement. 

invalid <»Kprossfon In IF statement. 

Syntax error or Jnvolld simpid argument In CALL siatamen;. 

Invu»:d exprewi-jn In CALL statement. 
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i Error 
Cede 

"Hi 
C42 
C43 

QHb 
C46 

C49 
C60 

CB1 



C52 
CB3 
C&4 
C65 

C66 
,C67 

cm 

cm 

C60 
X61 

C62 



CauiC of Error 



InvahU CHprdSSion to the ioftof on 9quoU sign in a statoment 
tunc nun. 

Invalid OKpiGUion to tho ri\)ht of on oqudU siQn in a statemont 
function. 

In 4in !F. GO TO, or 00 stoiemc^ti a Motoment number h 
missing, invullii, or (r)corrocvly (iloc U, or Isf thQ nun)bor of a 
FORMAT statement 

Synltix error in READ. WRIT or F INO Jtat^mont, 

*IOCS record missInQ with a READ or WRJTE stutoment 
(In DM? and TSX moinlino piooraim or^ly). 

FORMAT stoiemont number missing or incorrect in a RE AO 
or WRITE statoment. 

Syhlrtx error Tn Input/OuipoT lii:: or an Invatid list otcm^fm; or. 
In ft FUNCTION subprogram, tho input list elomont Is a dummy 
argument or is In COMMON. 

Syntax erroi In GO TO statement. 

Index of a computed GO TO is miss'ng. Invalid, or not preceded 
by aV'omma. 

•TRANSFER TRACE or •ARIT HMETIC TRACE control 
record present, with no *IOCS control record In a mainline 
program. 

DO stotonents are mcorrccUy nested, or tho terminal statement 
of the associated DO statomtnt is a GO TO, IF, RETURN, 
FORMAT. STOP. PAUSE, or DO stai^rirSent, or, in MPX or 
TSX, an MPX or TSX CALL statom.int 

More than 25 nested DO statements. 

$ynt«ix error in DO statoment. 

h)iti8l value in DO statement is zero. 

In a FUN^^ION subprogram the Index of 60 Is a dummy 
argument or is In COMMON 

Syntak error In BACKSPACE statement. 

Syntax error In REWIND statement. 

Syntax error In END FILE statemor>jt. 

0M2: ^Syntax error in STOP statement. MPX and TSX; 
Syntax error In STOP statoment or STOP statement In process 
program. 

Syntax error In PAUSE statement. 

'integer constant In ^TOP or P/VJUSE statement Is (jreater than 
9999. 

Last executable statontent before END statement Is not a STOP, 
GO TO. IF, CALL LINK. CALL EXIT, of RETURN statemqnt. 
Or. in MPX or TSX, an MPX or TSX CALL statement. 



V 



Error 
Code 



083 

ce4 

C6D" 
C60* 

C67* 

C68 
C69 

C70 
C71 

C7a 

C73 

C74 

C76 
C76 

C77 
C78 
C79 
C80 

C81 
C82 

C83 



Cause of Error 



Sjtatement contains more than 15 dlfferer^t subscript 
OKpressior>s. 

Statement too long to ba. scanned, because of Compiler 
^xpanslot) of subscript expressions or Compiler addition •» 
gdnorated temporary storage locations. 

All vwiablos^Jn ari EQUIVALENCE list are undefined. 

Variable nr^ado equivalent to an elomont of an array in ^fcioh o 
manner to cause tho array to extend beyond the origin of 
tho COMlVlON area. 

Two variables or array olomonts In COMMON aro equated, or 
tho rolatlvo locations of two variables Or array elements are 
asslariQd more !h5n . once (directly or. IM^^^^ 

Syntax error in on EQUIVALENCE statoment; or an illegal 
variable name In en EQUIVALENCE list, \ 

Subprogram docs not contain a RETURN siatflmcnt, or. In 
TSX, a TSX CALL statement, or a mainline program contains 
a RETURN sUtcment, « 

No DEFINE FILE statoment In a malnlln^ program that has 
disit READ, WRiTf , or FIND statements. 

Syntax orrSr In DEFINE FILE statement. 

Duplicate DEFINE FILE statement, more than 75 DEFINE 
FILEs, or OEFHNJE FILE statement in subprogram. 

Syntax error in record number of dhk READ, WRITE, or 
FIND statement. 

0M2; Defined file exceeds disi< storage size. MPX and 'TSX: 
INSKEL COMMON referenced with two- word integer. 

Syntax 6rror In DATA statement. 

Names and ^pnstonts in a DATA statenr^ont not Jn a one to one 
corrospbndenco. 

Mixed mode in DATA statoment. 

Invalid Hollerith constant In a DATA statement. 

Invalid hexadecimal spoclflcotlon in a DATA statement. 

Variable in a DATA statement not used elsewhere in the'*' 
program, or. In DM2, a dummy v,ariable in DATA statement. 

COMMON variable loaded with a DATA specification. 

DATA statement too long to compile, becauso of internal 
bufftirlng. 

TSX: TSX CALL statoment appearing illegally. 



*Tho detection of a code 65, 68, or 67 error prevents any subsequent 
detection of any of these three errors. 
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APPENDIX VIII 



. This appendix contains the 'User TerminQl WATFIV" section 
of the University Computer Center's Sy8teni/360 User's Manual.. 
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USER TERMINAL WATFIV 



The present varolon of WATFTV which is b©ing executed on th© User's Terminal 
in MS OIO9 has the following capabilities and requirements s 

(a) Compila time Is unlimited, 

(b) Executlor. time is limited to a'maxiraum of 30 seoonds, but can be 
CMt down by uae of the 'TIME* paraiTieter on Jthe $JOB card* 

(c) Execution output pagea la limited to 20* 

(d) Core size i& limited only by t;.he amount of free low speed core 
available* at any given time, Thia Information can be obtained^ 
from the users display station. 

=Faaturea * " 

1. NAMEUST^ 

2. Dlrect-Access I/O^ 

3. CHARACTER variables 
Debugging: 

-ful'« sentence dlagno^atic messages Instead of dddes. 
-undefined array elements identified explicitly rather than 
by array name only. 
1 -moro explicit error dlaja^nostlcs. 

-•other aids for localising! errors • 
5* Compatibility with IBM*s G» Portfan compilers is Increased:, 
--computed GO TO worlc as specified in C28--6515 when^GO TO 

Index is outside the allowable range* 
-array elements as arguments may be pa83e<L to subprogram 

parameters which are ar^ray names (see 62^6515 for rules), 
-variable dimensions work as specified by C28-^515. 
^•character set conventions SVb compatible with 6 and H, i.e. ^ 

treatment of (§• 
-treatment of ENTRY points in function subprograms is as 

specified in C28-6515. • 
^statement ordering conventions are^followed^ specification,' 
^ statement function definitions » executable statements • 

-real constants of the form 1E2, i.e,^ Without explicit decimal 
poirt, are now recognised. 
6, A few morr language extensions, ^.g.| multiple statements par card, 
^pre implemented ♦ 

• ' 

WATFTV Control Cards * . ^ ' 

Threa control cards - $JOB, $ENTRY, mid $IBSYS - are required to run a program 
under WATFIV. Th© order of the cards X& shovm below which defines a WATFIV job, 

$JOB - project number , social security number, paraitae tors name 

rFORTRAN. program' consist ing of a main ]prog ram and any number of 
\subprogram8. . ' - 

$BNTRY 1^ • . 

lany data required by the program , ' - 

IBM ay8tem/360 Fortran IV |[,^nguage, Form C28-65J.5 for rules. 
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The control field $JOB is punched in columns 1 to 4 of the cardp $ENTRY and 
$IB$YS in columns 1 to ^; column 5 and 7, reepecti'^ely » must b« blank. Accountiog 
information and Job parameters appear on the remainder of the $JOB card. Columns 
8 to 80 of the $ENTRY and $IBSYS cards are ignored. The $ENXRY card I9 required 
to Initiate execution of the compiled program even if no data i» required. 

WAYFIV JOB Card 

J ' { 

General Form: ; 

$JOB XXXXX,SSS-SS-SSSS,TrME«t.PAGES«p,LINES«k.REGION-nK, 




HECK 
OCHECK 
[FREE 

where: 

XXXXX - a valid project number for the run 
SSS^SS-SSSS - yc>ur Social Security number 

,t - an integer number representing the maximum number of seconds tq allow for 
execution of the program. Default is TIME«5. 

p an integer number representing the maximum number of pages to allox* the ' 
program to produce at execution time. Default Is PAGKS'^0. 

k - an integer number representing the number of lines printed per page. (The 
compiler uses, 'k* to provide automatic page skipping at both compile and 
^ecution time.) Default is LINES«60. 

n ~ an integer num<)er representing the amount of worlfing storage requested for 
the job. Default is REGION"20K. . ' . 

Coze) ■ • 

)029V- Choose 026 if the source program is punched on a model 026 (BCD) keypunch; 
-etioose 029 if punched on a model 029 (EBCDIC) keypunch. 

^HECK ^ - • " 

•sNOCHECKJ. ~ The compiler will check, at execution, time, for attempted uses of 
(FREE .J variables which have not been assigned A value (undefined variables) 
if CHECK is .selected. Use of NOCHECK suppresses the check, resulting in a 
aomewhj^t reduced execution time. Also, somewhat less object code is produced. 
RUN-FREE is the. same as CHECK, but the compiler will initiate execution of the 
program even if ' it contains serious source errors. If an executable Statement 
which cbntained a source errar is subsequently encountered, executlofa is 
terminatfMi. 



■pi 



fptlSTJ - Choose LIST it the compiler is to produptt a source li«tii!i|; of the 
j>r0graro; NOLXSX auppireapjia the lia ting 
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Choos® LIBLIST if the compiler i© to produce a source listing 
of the aubprograms automatically retrieved from a library; NOLIBLIST 
suppresses the listing of library routines. No|^6 that tho LXST/NOLIST 
and LIBLIST/NOLIBLIST parameters are indepondent. 



JmRN ^ . 

mOWARly - Choose NOWARN if the compiler is to suppress all diagnostics of a 
severity less than a fatal error. (Error severities are discussed in the 
section on DiaRnOstics. ) Choose WARN if the diagnopti||s are to appear in 
the source listing. 



JUBCHKj - Allowa subscripts to cake on any form as long as they do not 
exceed the space of the actual array. This will allow programs like t 
following to-^un. The SSP programs can be run in this manner. 



REAL A(10) 



CALL ANY (A) 



100 



SUBROUTINE ANY^B) 

REAL B(l) 

DO 100 I»1J0 

B(I)sO. 

RETURN 

END 



NOTES: 



erJc 



1. 



3. 



4. 



9 

The $JOB card should be punched on an orange card. The project number 
can begin in any column after column 5, Xhe first blank encountered 
thereafter will terminate the card sdan« One or piore blanks musT 
separate the user's name from the WATFIV parameters* 

«^ 

, The parameters may be punched in any order, e.g. 
$JOB X)CXXX,SSS-SS"-SSSS,KP'«026,TIME«10,NOLIST,PAGES«»15 name 
Parameters may" extend to column 80, 

^Default values (underlined) will be assumed for all parameters that 
ate omitted from the $JOB Card. - . 

If a parameter is raiapunched, the ©can for any remaining parameters Is 
stopped* and default values, will be assumed, e.g., 

$JOB XXXXX,SSS-SS-SSSS,PAGES"10,NOWARK,TAME«20,Ky»026,RUN*NOCHECK name 

The PAGES'-IO and NOWARN parameters ate recognized and'uiod by the compiler, 
but defaults, are assumed for all other parameters because of the mis^ 
apelXing of TIME. 

VIXI.4 3-1^ 
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5. If any parameter is specified more thaln /<JfiC©-^ th© rightmost value 
Is used» <^.g. , , ( 

SJOB }CXXXX,SSS-^SS-SSSS,KP«026,TIME**'15,LrBLIST,KP«^^ imma 



k /<mc 



Th.a KP»'029 parameter is recognized and used by the compiler. 



Source Code Libr a ries fo r WATFIV 

Th© capability for WATFIV to use a "source code" library for "unresolved" 
references is a'^ailable on the terminal version of WATFIV. This moans that 
users can put source cod© aubroutines or function subprograms into thlis library 
and "CALL" them froai WATFIV. It i§ optional tc> either p^int Qt not print this 
source code by using the LIBLXST/NOLIBLIST parameters oi^ the $JOB Card. Should 
any user desire to put often used routines into this llb(rary and "CALL" them, he 
should contact -.he UCC libi*arlan. A savings will result; if FIVPAK conmressed 
decks are store«l rather than "one statement per card" Fortran source decks. See 
the subsection of FiVPAK and UNPACK. 

Source Statemen' : Compress and Unpac k Routines ^FIVPAK ^ IJN]P^^ 
Purpose: 

FIV;PAK compresses "one statement per card" FORTRAN [source decks Into 
"multi-etatemen'-.s per card" decks useable in WATFIV. (UNPACK reverses the 
. procesa) . - 

Thi8 form of source input i8 efficient if programs are to be stored in 
source formVin liata sets on disks, since the results are)|: 

(a) fsSft^&r complle-tlmei i 

(b) more cards in the same amount of disk space. ' 

Method: ' ^ ' \ 

, Blanks are removed from all Fortran statements (inciudlng literal data using the 
H format code), except whore they are imbedded with apostrophies. Therefore » a 
source deck written with the H format code should not be | compressed . Comment cards 
are reproduced ss read In. 

DATA A.B/2H *,'*'/ ■ 
X-5.0 ; 
3P6 go to (3,8) ,1 



is compressed into, - ; • 

• DATAA,B/2H*,' *'/;X'»3.0;3o:GOTO<3,b),I | 

The cards produj'.ed are 8equence"numbered In Increments of 10; 

' • V 

How to Use: ' ^ 

i 

CALL FIVPAKXNREAD.NPUNCH), or CALL UNPACK (NREAD,NPtJNCH) 
where NRKAJD " unit nimiber fdr Input data 

NPUNCH * unit number for output data i 2 

Both programs must be called from a program tun under WATFXV . 



1. ApproKlmat6 saving of 60% (typical example, 281 oard^ compressed to III), 
ER?C^* FIVPAK and UNPACK reside In WATFIV 'a souroe H^Ary ^luATFXVjp/iTLIB. 

HH^taj' \TTfr e ^Av) i 
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since they use ( llARACTER variables; for example, to read cards from the reader 
aiM punch a new deck. * 

" //JOBNAME JOB (XXXXX , SSS-SS-SSSS , t ime) , 'ua©r->name ' 
// EXEC WA1FIV 

//WATFIV.SVSPUNCH DD SYSOUT^B 

//WATFIV.SVSIN DD * . • 

$JOD NOWARN name 

CALL FIVPAK(5,7); STOP; END "* . 

$ ENTRY 

one-statemenc-peif-card deck to be cbmpresaad 
$IBSYS 

// ■ 



NOTE; 



( 



^ More than one program deck can be compressed uaijmg FIVPAK by placing a 
card with an asterisk in column 1 between each complete deck, UNPACK doea 
not require such a "separator" card* A 360 Special Rup Submittal card indicating 
punched output must be included wlt^i the above job. 

Control Cards t o Edit Source Listings 

Four new control cards have been aSded to WATFIV to be used foK controlling 
the prlntirig of compile-time listings. These are $PRINTON, ^PRINTOFF, $SPACE 
and ,$EJECT. 

When a $PRINTOFF card is placed in the source deck, the listing will 
terminate at that pointy The $PRINTOFF card itself is not printed. 

A $PRXNTON card will allow the listing to be restarted if a previous 
$PRINTOFF card was used or a NOLIST option was punched on the job card. The 
$PRINTON card is printed. 

The $EJECT and $SPACE cards cause the printer to skip to a new page £tnd a 
HBw line respectively. 

p 

A source deck using these cards might be as follows: 

$JOB XXXXX.SSS-SS-SSSS, NOLIST name 

cards not to be listed 
$PRINTON • 



ERIC 





cards to be listed 


$EJECT 






subprograms 


$SPACE 






END 


$ENTRY 


4ata cards' 




$IBSYS 
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These control :ard8 can be used to advantage when a large program 1© balng 
tested. By suppressing print in areas where code has not been changed, the user 
can eavG on raachine printout tJjoie and thus have tho job run mote ^conofialcaHy • 
Also, the $EJECT and $SPACE cards can b© used for the final "production run" to 
make the output look more pr^sautable. 

t'X<^cutinR WATFIV ln^:he OS Job Stream 

l^rhe^ 'EXECuting WATFIV the following procedure should bo followed: 

1. Set up the deck as shQv^ below and submit In MS 010, 

2. The OS JOB (// JOB) card must be punched on an orange o«rd, but the 
WATFIV $JOd card should not be on an orange card. Do not include the 
project nunber or Social Security nuinber on the $JOB card. 

A region o llOK plus the amount of working storage for the WATFIV job 
Is requlreil. For instance, if the user needs 40K for his job, th^. i 150K 
would be snectfled in the region pa[rameter. ClASS^B is required for 
region sizie greater than 127K. An example follows: 

//JOBNAME JOB (XXXXX, SSS"SS-SSSS,2) . ' user -naine\REGION-150K,CLASS-B 
// EXEC WATFIV 
//WATFHtV^YSIN DD * 

$JOB TIME«20,K^«026,NOWARN,N(5§UBCHK name 
WATFIV jource deck 

$ENTRY ' ^ ^ ^ 

# input data ' - 

$IBSYS 

//. ' 



La nguage Extenslpns 

# 

WATFIV attempt} to support the language descrijaed in the IBM publication 
"IBM Sy8tem/360 FORT^N IV Language", form C28-6515, subject to the subsection 
on "RESTRICTIONS", 'n addition, WATFIV supports a number of extensions to th€f 
language, which are -lescribed below. Uses of the language extensions, except 
for 1, 7, 12, and 13 are flagged with '^EXTENSIONS* messages. These mean that 
the program is accep cable to \^TFIV but will not likely compile on other compilers. 
The messages can be suppressed by use of the NOWARN parameter on the $JOB card. 

1. Fbrmat-fre© I/O. This allows the programmer to do I/O without reference 
to a FORI^T statement. For example, the statement PRINT, A,B will cause 
the values of A and B to be printed with a standard format. Format-free 
I/O statements may have one of the following forma:" 

READ, list 
^RINT", list 

REA»(unit,*,EJiD«mj,ERR«m2) list 
WRITE(unit,*) list 

,317 

VIII. 7 
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The 1/0 for tht 1 irst two forma is done oi the efcundard reader and printer 
units, i.e., 5 and 6 respectively. The astetiaka in the last two fotme iwply format- 
free I/O, artd 'unit" may be a constant or variable unit number. The .END and ERR 
returns are optional, as with the conventional READ statement. 

Note that the two atatements 

READ.Dsit 
READ(5,*)U8t' 

are equivalent, as are ^ ^ 

PRINT, Ust 
WRITF.((.,*) list 

-Sojue examples follow: 

READ, A, B, (X(I),1"1,N) 
PRINT, (J ,Z(-I) ,<J»N.K,V) ,I.P 
99 WRITE(6.,*) 'DEBUG OUTPUT' ,99, X,Y,Z+3. 5 * 
READ(I,*.P:ND"27) (X(J),J«1,N) 

Free Input data items may be punched one per card, or many per card; in the 
latter case> the data items must 'be separated by a comma and/or one or moire blanks. 
The first data item on a card need-not start in column 1. A data item may not be 
continued across two cards, i.e\, the end of a card acts as a delimiter* 

Successive cards are read until etlough items have been found to satisfy the 
requirements of the "1 ist'.'par t. of the statement: 'Any items remaining on the. last 
card road for a particular READ statement will be ignored ^Ince the next READ 
statement executed wJ 11 cabse a new card 60 be read. 

It is perfectly 'valid to use format-free READ statements, and conventional 
REAP statements in the same program. ^ ( 

The forms of data items which may be used for the various types of FORTRAN 
variables are: 

Integer - slgnt^d or unsigned integer constant ■ • 

Real' - signed or unsigned real Constant in F,E or D forms 

Complex - 2 real numbers enclosed :^n parentheses and separated .by a comma, 
' e.g» . (1 .2,-3.8) . 

Logical - a string of characters containing at least one T or F. The £ifst> 
T or F encountered determines the logical value. 

Character - a Htring of characters enclosed by quotes. If a quote is required 
as inpyt, two successive quotes should be launched. 

The type of a data itm must match Uhe type of the variable It is being read into, 

A duplication factor may b« giv^n to avoid punching the sam© tonstant many times. 
For example » if we have 

DIMENSION ■ A(25) ' 
READ, A 

the data for the READ statement eould be punched as 
O 15*0^»10*«3,8 

ERIC ■ 
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(i) source statement 
typical data 

(ii) SQurc® statements 

typical data 

(iii) flource statements 

typical data , 

(iv) source statements 



READ, X, I, Y, J 
2.5 3, -7. 9, =-41 

COMPLEX 2(5) 
READ, (E(I),I«1,3) 
(5.2,-16.0) 2A(0.i.5E-3) 

LOGICAL Ll»La»L3 

READ,L1,L2,L3 

T .FALSE. » CAT- 

CHARACTER A*l» B*3 
READ, A, B 
*A\*DOG' 



For free output data itemq the compiler supplies formatting for list items output 
by format-free stateanenta. Lin© overflow is automatically aoaounted for, i.e., several 
records may result from one output statement. 



The formats used are: 
Integer 
Real^A 
Real*8 
Complex*8 
Complex* 16 
Logical 
Character*n 



"112 
-E16.7 
-D28.16 

- ' (* E16.7 ' E16.7 ') ' 
" '(• D28.16 D28.16 

-L8 
-An 



2. -CHARACTER Variable. This is a new type of variable which allows the manipulation 
of data In the form of character strings. A simple exarapla of the use of a 
CHARACTER variable follows: 

CHARACTER A*7 . • ' 



A- 'FINALLY' 



X 



The standard and optional length specif ication» which determine the 
tiumbar of charaoters that are reservctd for each charactet variable ate: 



CHARACTER 



Standard 



l<n<255 
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A prograimner m.iy declare a variable to be of the character type by use of the 

(1) IMPLICIT specification statomenC. 
(il) Form of the explicit specification statement: CHAJRACTER 

IMPLICIT Statement: 

The type CHARACTER is permitted in the IMPLICIT statement with a specified 
length. If length is omitted, the standard length of 1 /is assumed. 



Example: 



IMPLICIT CIIARACTERA80 (A-D) .CHARACTER ($,Z) 



Explanation: ^ 

All variables beginning with the characters A through D are decla ^d as 
CHARACTER type, each variable or array element 80 characters in sizo. All va iables 
beginning with the characters $ and Z are declared as CHARACTER. Since no length 
jjpeci float ion was explicitly given, 1 character (the standard length for CHARACTER) 
is alloc 1 ted for each variable. 

CHARACTER Statement: 



GENERAL FORM 



CHARACTER'S a'sIXk, ) /x. / ,b*8^ (k^) /x^/ > . . . .z*s (k )/x / 

Where: »*£2 * * * * '^-S^i optional • Each represents one 

of the permissible length specifications. 
• • • >^ represent variable or array names 

(k, ) > (k^) , . . . ,(k ) are optional. Each k is pompoaed of 
of 1 through 7 unsigned integer constants separated 
by cc^mmas, representing the maximum value of each 
subscript in the array. Each k^ may be.^an unsigned 
integer variable only when the CHARACTER statement 
in which it appears is in a subprogram. 

/x,/,/k^/,. . . ,/x / are optional and r.epresent initial data 
values % 



The tlffqnnation nece^ary to allocate storage for arrays (dimension 
information) may be inclined within the statement* However, 1£ this information 
does not appear In a CHAKf^CTER statexoent, it must appear In a DIMENSION or COMMON 

Initial data values may be assigned to variables or arrays by u»e of 
/x /-where x ie a constant or list of <?onstant8 aepar^ted by commas. 
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Thla BOt of coniuaatj^ may be In the form **r^ conotiint*', where r ia an unsigned 
Integer^ called the rept- it con.Miant • Tho Initial data valuos may only be literal 
constants and n[iu8t he the s^ime length as or shorter than th« cpff ©apofldlng varlabl© 
or array element. Initial data values will be truncated frotn the right and diagnosed 
if too long, and they will be padded witl^ blanks on the right if too short (a©© 
. •*E3cainple 2" below). 

An Initially defined variable or a variable of an array may not be in . lai 
coimnon* In a labeled common l>lock they may be initially defined only in a BLOCK 
DATA subprogram. 

the CHARACTER st.uement overrides the IMPUClX statement- If the length 
specification is omiLt»d (l.e,, *^_s ) , the standard length of 1 is assumed. If an 
array Is used in a subprogram and i« not In a COMMON, the size of this array may be 
«p«cifled Implicitly bv an Integer variable of length 4 which can appear explicitly 
in the SUBROUTINE statoin^^nt or implicitly in COMMpN (adjustable dim^-nsions) . 

Example I : 

CHARACTER>^80 CARDS (10), LINES^ 1 32 ( 56 , 2) ,TCAR1) 

Vlanation: * 

This statement doc lares that the variable TCARD and the arrays named CARDS 
and LINES are of type CMAllACTER. In addition, it declares the size of the array 
CARDS to be 10 and array LINES to be 142 (2 groups of 56 each). Each element o'f 
the array LINES is assigned 132 characters for a total of 14,784 (112 times 132) for 
the array. . > 

* 

Each element of the array CARDS and the variable TCARD is assigned 80 characters 
(the length associated with the type). The array CARDS is assigned a total of 800 
characters. 

Example 2: » ■ 

CHARACTER X^KA)/ 'ABC ' , 'DEFG' , 'HI' , ' JKL' / 

Explanation: 

This statement declares that the array of four elements of three characters 
each named X has initial values; 

X(l) ABC 

X(2) DEF 
I X(3) HI 
' X(4) JKL 

The statement Ys incorrectly written^ and the value specified for X(2) has 
bi^en altered by ti:uncation. 

Multiple Assignment Statements. ' 
Statements of the form 

V2 « eKpression 



( 

o 
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arfe allowed^ where v^, etc\ » represent variable names or array elements. The 
affsct la that of the aei^ueuce of atatements 

^ express ion 



V , « V 
n-1 n 



J' 



E.g., A « B(5) - C « 1,5 



Expressions in Output Lists, 

Expresgions may be placed in output Qtateraentat ©•g** 

WRITE(6,2) SIN(X)*^2,A*X+(B-'C)/2 

The expression may not^ however, start with a left parenthesis becau he 
compilei- u^es this as a signal that an implied DO follows in the Hot. For example: 

PRINT, (A+8)/2 / 
would result in an errov message. However, the equivalent 

PRINT. +(A-^B)/2 
Is acceptable. 

Note that CHARACTER constants are forms of expressions acceptable in output 
statemrents, e.g., - 

PRINT, WALME ok X"' ,X 

Initial Iztng of Blank Coiiunon. 

Variables in blank common may be initialized in DATA or type statenients, e.g., 

COMMON X 
WgERX/3/ 

Initializing Common Blocks. 

Conmon blocks nay be initialized in other than BLOCK DATA subprograms. 
Implied DO*s in DATA Statements 

Implied DO's are allowed in DATA statements, i.e., a statement of the form 

DATA (C(I), l*l,5,2)/3**25/ 

la valid. ^ ' 

In fact, 

DATA (A(I). I-L,M,1N)/ constant list/ 



m 



is acceptable if L,M,N have been previously initialized and at least 1 constants 

are present In the conat^t list. - ' * 

Subscripts In St§^tement Function Definitions* 

~ Subscripta may be used on th0 rii^ht-hand side of statement function definitions, 

«*8* > F(X) «» A(IHX 4-^B(I) 

Subscripts may be logical, complexi or character values. 

The real part of a complex value is converted to an integer, and this value 
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Is ufied for indexing ,into th& array. For eKampl®, if Z i& complex, and A i© an 
array, then A (Z) is equivalent to A(INT(REAL(Z))) . 

Transfer statements object of a DO. 

A logical IF statement used as the last statement (object) of a DO loop may 
coiTtaln a GOTO of any fo^, a PAUSE, STOP, RETUKN, or arltlimetio IF ®tat«iii«nt. E.g. . 

DO 25 T-1,N 

25 IF (X.EQ.A(I)) RETURN 

Exceeding th© continuation card limits 

A statement may be continued on 10 continuation cards. 

Multiple statements per card. 

WATFIV allows the programnier to punch more than one 8tat«ment on a single card. 
This is particularly suitable for programs that are to be stored on library ©£» since 
li^BB direct*- A^Kieas storage space is required, and fewer input operations ato necessary 
to retrieve a subprogram. 

The i*ule8 for this feature are: ^ 

\ 

(a) Only I Columns 7-^72 may be used for statements. 

(b) A seniicolon is used to indicate the ^nd of a statement. 

(c) The normal continuation card rules are used for a statement xjhlch is to 
be continued beyond column 72. 

(d) Statement numbers appear in columns 1--5, as usual, or following a 
semicolon and followed by a colon. They may not be split onto a 
a continuation card. 

(e) Comment cards and FORMAT statements must be punched in the conventional 
manner . ^ 

Column 6 

E.g., 25 A-B;C«D; 39: PRINT, A,B, ^ 

A C,D;X-A-fB*C+D 
PRINT, X; 99: STOP;END 

This could be punched in the conventional manner aa 

25 A«B 
C«D 

39 PRINt,A,B,C,D 

X-A+B^C+D 
• PRINT, X- 
99 STOP 

END 

•I 

Cottonents on FORTRAN statements. 

The compllcir terminates the left-to-right scan of a particular card whej! 
J* ^ (pronounced 'aigamorph' , and punched as a 12-11-0-7-8-9 multi-punch) is \ 
encountered. Ef f ectiv.eXy , this means commetiJt^ may jfollow a FORTRAN statmetit 
oh; £h6 same card if a i| is used to termin^e the FORTRAN'S tat «mi«aat. 

Not© 'that ^ unprintable, as well as being almost unpunchable. 
, • e/^., X»A+SIN(Y) EVALUATE X ' 

th« DmOPLIST and ON EICROR QO TO statements have been implemented WATFIV as 
0«bugging aids. 

Q * Vlll,13 Qrro 
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The user of WAFFIV should take note ol the following rostr lections in 
language and facilities provided by the compiler, 

1. The name of a common block must be unique^ i.e., it may not also be usad 
a© the name of a variable, array, or statement function. This is in 
violation of C?ft-6SJS. . 

2. The concept of the extended range of a DO loop defined in C28-6515 Is 
not supported. 

3. The service subprograms DUMP an'd PDUMP defined in Appendix C of 
028-65^15 are not fiupported. 

A. The Debug Factllty described In Appendix E of C28-6515 is not supported. 
5. There are no fac;lWtles in WATFIV which corresponds to the FORTRAN 
G/H options -HAP, E1)1T, XREF, OPT-, DECK, LOAD, NAME'-, LIST, 
6. The Extended Hrrpr Mjessage facility is not aupp.orted. 

7. No overlay facility is available; no ^module map' is produced* 

8. The number of continuation cards, as well as the use of operntor 
messages with STOP and PAUSE statements, are installation option^. 

9. No more th.m 2S5 DO statements are allowed in a program segment • 
10* FORMAT ( is a reserved character sequence when used as the first 7 . 

characters of a statement. It is the onlv reserved character sequence. 
For example, 

FORMAT (I) » 3.5 ' 

will result in FORMAT error messages, whereas 
X-FORMAT (1) 

la legal, assuming FORMAT to be an array or function name. 
11* WATFIV is a 'one-pass' compiler , and requires several restrictions on 
statement ordering. These are: 

(a) Specification statements referring to variables used in NAMELIST * 
or DEFINE FILE statements must preCeed the NAMELIST or DEFINE FILE 
statements. * 

(b) . COMMON or EQUIVALENCE statements referring to variables used in DATA 

or initializing tyfy^ statements ijmst preceed ^the DATA or initializing 
type statements • 

E,f:., REAL 1/3.2/ 

COMMON I 

will produce error messages, whereas, 

COMMON I ^ 

REAL r/5-2/ 
is acceptable. 

r (c) A variable may appear in an EQUIVALENCE statement and then in a 

subsequent explicit type statement only if the type statement does 
not declare ^he length of the variable to be different than could 
be assumed for it, based on the first letter of the variable name, 
at the time^pf its appearance in the EQUIVALENCE statement* 

For example » 

EQUIVALENCE (A,B) 
REAL*8 B 

« 

vill produce an error message, whereas 
REAL*8 B 

EQUIVALENCE (A,B) 

will not. Note that 

EQUIVALENCE (A,B) > . 

^ INTEGER B • . 

ERIC 

, la acceptable since the, length of B is^liwt^changed by the type 

atatisitient. ' \ 
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The most likely cau^o^tyf difficulty is iho use ol atrays aa, subprogram 
argumi^ntd; this will be discusaed last. Let's take caic^ of the ^asy ones first. 

1. WATFOR does not support the NAMELIST, Direct Access I/O, CHARACXpi 
variable language features, 

2. WATFOR does not support the LIST/NOLIST, LIBLIST/NOLTBLIST, 
WARN/NOWARN job optrions. 

3. WATFIV Issues warnings if the proper ^ordering to^rBt^tementa is not 
follox:yed. The proper order is specification statements before statement 
function definitions before executable statements* , 

A. With WATFIV, DO- loops may be nested to any depth. M 

5. A half -word integer variable may not be used as a unit number in an 
I/O statement with WATFIV, ^ - 

6. WATFOR does not accept source statements in compressed form, i,^,, 
more than one statement per caixl. ' 

7. If the index of a computed GOTO is negative or zerq control trar f'^'s 
to the next executable statomont with WATFIV; this follows the 
specif icat ion3^j:2tu:28-651 Under WATFOR. a terminating error massage 
l-s given. 

8. WATFOR gives ^peoial treatment to the $ in IMPLICIT statements, WATFIV 
assumes it fallows Z in alphabetical order; is the convention of 
028^6515. 

9. If a function t^ubprojjrcim has addlMonal entry points, WATFOR* does not 
*equivalence' the variables which are the names of the function and 
its entry points. WATFIV does this, as prescribed by C28-6515. 

10. The conventions, used by WATFIV, for intermixing EBCDIC and BCDIC 
characters in source programs are slightly different than those used 
by WATF6R, 

(a) WATFIV do,^8 not allow intermifking of the two quote marks in a program. 

(b) If KP«26 is specified / WATFIV uses to denote a statement number 
argument; WATFOR u^es a 12-8-6 multipunch (EBCDIC ^4-' ) for this. 

11. WATFIV threats arguments passed to subprogram parameterisi which are arrays 
differently than does WATFOR. 

(a) WATFIV allows the actual argument to be an array element or a simple 
variable. 

(b) WATFIV uses the dimensions declared for the dummy array Un the 
called subprogram* . This ensures compatibility with FORTRAN G/H, 
and object time sdimenslons work As specified by C28-6515. 

K 

Under WATFOR » the dimensions for a dummy array are Ignored at execution 
time. When an array is passed from subprogram to j^ubptogram, the dimensions 
that are declared for it in' the program segment in which it is actually 
allocated Qt^age are implicitly passed as wall. These dimensions are then 
used for »<fbscrlpt calculations. 

Poinr^<^b) Mmplies that the results will be different under WATFOR 
and WATFIV if the dimensiotxs of the dummy array differ from those of the 
actual array passed. 

Infipmpat tbillt with FORTRAN \a G/H 

Note that the differences listed below do not include the language e^ctenslons 
and teatr let ions • Nor do they Include differences which arise either because 
object programs compiled under C/H are freely allowed to violate the language rtiles 
4«fined by 028-6515 (e.g, , passing an argument of type INTEGER to the SQI^T subtoutiue), 
or because the G/H compilers accept syntax not defined in C28-6515, e.g., 

WRITE(6,2) (A(I), A(2)) * , 
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. The major cauacs of dlffertMirori hotwoon WATFIV and KORTOAN'h G/H nr«> likely to 
th© treacmant of FORTRAN -supplied functions and number converalono. 

1, WATFIV provides execution-tima page skipping, controllod by the LINES'* 
^ Job-parameter. ^ 

2, WATFIV allows any number of contiguoua coimnento cards; commouts cards may 
precede a continuation card, 

3, WATFIV uses otvly the hiKh'Ordor byto of a logical quant:>.ty in logical ^ 
operations. For example, if A and l\ are of type LOGICAL *A ^ exocutlon^of 
the statement 

A « B * ^ 

\ ■* 

caufflSs only ^ byto t'(>*l)e moved. 

4, D(Vl\op8 ma/ be nest oil any depth In WATFIV. 

5, ' WATFW suppoit« both FBCDIC and BCDIC ' + ' as a carriage control character. . 
6% WATFlV coni^iders the program to be In error if it executea i\ RKTURNi sfate- 

meat in which the value'of 'i' is zero , negative , undefined, or greater 

thV^n the number of statement number argument h which Appeared in the ^agument 

Hat of th0 CAM. statenuMU wlUcM) invoked the subprogram from which tht* 

return is.Ji,cin.v', iuade<j» 
7- WATFlVi^uytnts no (uossa>\e equivalent to t,he 1HC2101 (*'old PSW is 

message wlien in tiM runts occur. 
8. With WATFTV, a uso of T format which does a 'bai^kward' tab In an output 

buffer does rot caune existing character^ iiifgehe buffer to be blanked out . 

For example, consider the statements: 

K'" 9 • • 

^ .!« I 

WRITE iO,7)K,J 

7 FORMAT (' $$$.00' ,T3, 12,16,12)' - 
With WATFIV, thf HiitJi appears as: ' . " 

$$9. 01 

With G/H, It appear aa : 

$ 9. I « 

Actually, this Is a conaernjence of tho fact that WATFXV's formatting routiiu»> 
nssjumo the huffor to be blanked before any filling of it occurs, i.e., only 
Blgnlficant characters ar« moved into the buffer. 
9. REAL*4 values are printad with a majtlmum of 7 significant digits. If the 

output format specification calla for more, i.e., K20.10, zeroes are supplied 
on the right . 

10. WATFIV treati^ FORTRAN-supplied functions differently than G/H as follows: 

(a) Tho functlon'H type must be explicitly declared if it is different than 

can ho .isHumoci from the implicit rule8.'~"> 
(h) WATFIV makes no distinction between 'in-line' and 'out-of-llne' functloim 

all functlonn are out-of -line. .... 
(c) WATFIV oveluatcs all func*^lon§ that require complicated approjclmation 

formulae in double precision, i.e., 

SQRT(X) ' ■ •W^*^, 



is calculated as, essentially, 
SNGL(DSQRT(PBLE(X))) 
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.11. WAtFlV- handles FORMAT statements differently than G and H as follow©: 
(a) Commas are not required between format codes In WATFIV. 
(b^ WATFIV allows more than the maximum number of continuation cards for 
«. FORMAT statement©, 

(c) WATFIV doe© not allow group or 'field counts to be zoro. 
12, Execu t ion- tim© data cards road on tha standard card readm" unit by WATFIV- 
compiled programs may not contain a $ in column 1. 
"13, With \i^T?lV a particular labeled COMMON block can be initialised in 'Mor 
* ' than one BLOCK DATA subprogram. This allows undetected violations oi ruAv 

specified in C28-6515, 

DIAGNOSTICS ^ . - 

. 

WATFIV lasu^ complle-time diagnostics at three levels -of severity - EXTENSION, 

WARNING, and ERROR, A dtagnostie is generated in-lin^ in the. sour c a listing, 

tnUnedladely below the statement in which the condition was detected. 

Ari^ EXTENSION message results if you used an extension of the FORTRAN language 
allowed by WATFIV. The diagnostic is Issued so that you can elin^inate the pi..Diera 
should you ever wish to re-compile with IBM's G or H compilers. 

A WARNING is issued for language violations for which the compiler can take 
some reasonable corrective action, e.g», truncating a name of more than 6 characters. 

An ERROR is issued when a language violation severe enough to pi^event execution 
is encountered. In this case, the compiler will nomially inhibit execution of the 
^program, unless you have specified RUN-FREE, 

At execution time, all errors are fatal^ l\i the sense that the compiler will 
terminate the current job and proceed to the next Job in the batch. For execution- 
time errors, the compiler generates a. diagnostic and a subprogram traceback in the 
printed' output • This gives the line number of the statement in which the error 
occurVed, t^e name of the subprogram in which the error occurred, the name of the 
subprogram which called it, etc^, all the way back to the main program which is 
referred to as M/PROG, (The line number of eacb statement appears to the left of it' 
in the source listing. This line number is compiler generated, and is distinct from 
and should not be confused with any FORTRAN statement number the programmer may hav^^ 
a&signed to a statement,) ^ 

ft 




.i n , i . i . TOW .i i i w w w ili »m i mJiu'a .. j.— ■. .il / . . . .n , , 

1. Exception: It an I/O error occura and the jprogiftoamer has specif led .an ERR« return 
^ in the affected I/O atat^ent^ an error measage la given and execution proceeds- at 
•th«j ^8tat€anent specified by the ERR". 
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Control Cards tor Certain Dta|:^nostlc8 

Four Control cartis have been added- in th© VrL2 WATFIV compiler. The $WARN and $NOWAKN 
cards control tines printing of compiler generated warning and extension messages; the 
$CHECK and $NOCHECK qurds control the compiler's checking- of undefined variables. 

When a $NOWARN card is placed in the source deck, all warning and extension 
meaaages will be suppressed from that point on. A $WARN card will allow the warnaug \ 
and extension messages to be restarted if a $NOWARN card was used or the NOWARN 
option was punched on the job card. 

I, VThen a $NOCHi:CK card is placed in the source deck, from that point on, the 
compiler bypasses the generation of object code to check for undefined variables at 
.execution time, A $CllECK card causes the compiler to generate the checking code if 
a $NOGHECK card appeared previously, or NOCHECK was specified (or defaulted) on the 
$JOB card. 

The source deck using these new caYds might be as follows; 

$j6b XXXXX,SSS-SS-SSSS, NOWARN name J* 
compile with "CHECK" 
no warning and extension messages 

$WARN 

m 

warning and extension messages may be printed 

$NOCHECK 

' compile with "NOCHECK" 
EtJD 



$CHFXK 

J$ ENTRY 
$IBSYS 



subprograms 

compile with "CHECK" 

END 

data cards 



X 



2. The $WARN/$N()WARN and $CHECK/$NOCHECK cards allow local control of their 
functions. This can he useful If a program is being debvigged in stages, with routines 
being added or changed over a sequence of runs. If a $NOCHECK card (or the NOCHECK 
job option) can be used because a segment of a program la kno^m to be free of 
undefined variables, several advantages can result: 

"less object codo is generated; thus, a soipewhat larger program can be compiled 
for a given amount of available memory* 
^-the program will run somewhat faster since the checking code is not executed, 

., ■ •■ '* 

Additiona l WATFIV Debugging Aide 

Some new debugging aids Ijave been added in the VIL2 version of WATFIV. They are 
the DUMPLIST statement, the ON EmiOR GOTO statement, and a statement trace facility. 

1) The DUMPLIST statement is designed especially as a program debugging aid; it ia 
used as follows: 

(i) A DUMPLIST statement is essentially a NA^DELI$T statement, except that the 
work DU^CPLIST replaces the word NAMELXST, The usual rules for NAMELXST 
. statements apply. Sample statements are: 

DUMPLIST /m/A,m,APE/L5K/XX,NE3CT 
O . DUMPLISf\^THIS/N,TWO,SIX,OU) ^Cjg 
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(it) A DUMPLIST liBi name need never appear In a RUAD or WITE statement, 

"X (ill) A bUMPLlST st4it^©nt has no effect unless th© progr^im in which it appears 
is terminated because of an error condition; thon WATFIV will autoBxatically 
generate NAMELIST ~ like output of all DUMPLIST lists appearing in program 
aagment8 which have been entered • The valueei printed are those which the 
variable® had wh^n the program was terminated, 

to -avoid prpducing too much output, only a few key variables should be placed 
in DUMPLIST atritements, 

* # 

2) The ON ERROR GOTO statement allows a program which J^ias an error to recover and 
take some alternate and posalbdy corrective .action, auch as giving diagnosis. This 
feature can only be executed ohce in a program (to prevent infinite loops) however, 
any number of ON ERROR GOTO fifcatemer^t may appear in the source program. The last ON 
ERROR GOTO stAtement encountered b^ore an error occurs is the one which is executed. 

A program using this ^fei^ature might be as follows: 

$JOB XXXXX,SSS-SS-SSSS^^ame 

ON ERROR GOTO 30 
• ^ I«0 

5^ ' READ(5,A,END«A0)A 
I-I+l 
•PRINT, A 

GO TO 5 * 
50 PRINT, 'CARD ^aJMBER' , I, 'IS INVALID' ' . 

AO STOP 

END 

$ ENTRY 
$IBSYS 

m 

The ON ERROR GOTO statement is not an executable statement; however, it can be 
placed anywhere in the program. It is not advisable to place an ON ERROR GOTO 
stfatement within the range of a DO-loop as no checking is performed to determine if the 
transfer at execution time will be valid (i.e., infinite looping may result). 

3) An execution time statement trace of "ISN trace" feature is now available. The 
trace is turned on using a $ISNON card and is turned off using a $ISNOFF card. At 
least one executable statement must precede a ISNON. A sample program follows: 

$jpB raXX,SSS-SS-SSSS name 
A»i 
J«3 

$ ISNON 

(statenients to b© traced) 

$ISNOFF 

STOP 



END ^ 



$ENTRY 
$IBSYS 
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INTERRUPI^S 

This ajgption provides Inf orination bn the tr©at;4eht of interrupts that may occur 
during th© ex^ution of «^ FORTRAN progra^ft. 

Normallyf WATFIV terminates execution of the program at the first occurrence . 
an exponent overflow, exponent underflow, fixed divide^ or floating divide Interruj,',. 
However » a library subroutine, TRAPS» is provided to allow the programmer to acoept 
more interrupts of the types Just mentioned. Thus, with appropriate .uaee of subroutine 
DVCHK and OVERFL, a programiqer may provide, to some extent, his own treatment of 
interrupts. 

A call to TRAPS may have up to five integer valued arguments, and theae correspond 
to the numbBr of fixed overflows, exponenc overflows, exponent underflawa; fixed divide, 
and floating divide interrupts the programmer wishes. The arguments of TRAPS set up 
Internal counters useil by the compiler's interrupt i\>utUne. The latter routine 
decrements the appropriate counter "by 1 when an interrupt occurs; when any)c'vunter 
reaches zero, the pro|L*ram is terminated. 

TRAPS i^nay bo cal led (and subsequently recalled) at any point in the main program 
or a subprogram lo seL (or reset) the interrupt counters. Arguments of TRAPS are 
screened so that the absolute value of any negative argument is used as a positive 
count, and a stero value Is taken to mean that the current value of the corresponding 
interrupt counter should be left unchanged. 

EXAMPLES: ^ 

— A 

1. CALL TRAPS (0,3,7,-3,1) 

^sets the int(»rx'upt coi^ters so that the program will be kicked off on the 
^ occurrence of the first of the: 

-5th exponer\,L overflow, or 
--7th exponent underflow, or 
-3rd fixed divide, or 

-1st floating, divide exception following the execution of this call to TltAPS. 
The stateraenL CALL TRAPS , (0,^,7,3) has the same effect. 

2. LUNFLO «« 100 • . 
LOVFLQ « LUNFIXI ' • 
CALL TRAPS (0, LUNFLO, LOVFLO) 

sots the counts to kick off the program on the occurrence of the first of the: 

^-lOOth exponent overflow, or 
-lOOth exponent underflow, or ' 

~l8t fixed divide-, or , ^ % ^ 

"Ist floating divide exception following the execution of this call, 

3. CALL TRAPS (U) 

sets the fixed overflow counter to 14, Kickoff would occur at the 1st exponent 
overflow, underflow or divide exception or the 14 th fixed overflow i'f the 
installation has activ^ed this interrupt. NOTE° that the distributed version 
of WATFIV operated ^ICh this Interrupt maskfcd off, and furthermore, that this 
Is the normal mode of operation pf FORTRAN G/H. 
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OVgRFLa DVCHK . ^ 

Th©8^ routines function as follow©: 
CALL DVCHK (j) 

j is an integer variable that ia sat to 1 if tho (pseudo-) dlvide-chfeck 
indicator was on, or to 2 if off. After testing, tl^ indicator is turned off. 

Th© indicator is sat on "when a flxod or floating divide ©xcoption occurs* 

> CALL OVKRFL (J) . . . 

. j is an integer variable that ia ©et to reflect the mos^t rcscent setting of 
P^^^^^O"- indicator to L if an__<2CH:p_ono_nt oVarf low was last to 

occur, to 2 if no exponent ov€5rflo\>r or underflow condition exists, or to 3 if an 
exponent underflow was last to occur. After testing, the indicator is set for no 
condition, i.e., to 2. 



1. The compiler Interrupt routine loads the affected machine floating-point 
register with zero or the properly rgigne^ft largest floating -point number 
for exponent underflow or overflow, respectively. 

2. The five interrupt counterei are initialized by the compiler to 1 at the start 
of each program. The divlde-check and overflow i^jadioator are not 
inltiallz^ed; it is the progranimer * s reponsibility to do this, e.g#, by 
duimny calls. 

3. The terminating message is the only indication given by the compiler that 
interrupts Have occurred. It is the progranoner * s responsibility to 
monitor thesb using OVERFL and DVCHK. 

^. WATFIV operates with the fixed overflow and significance interrupts masked 
off ei^tirely. 

* 5. WATFIV automatically corrects for boundary alignment, ferifors at oxecution 
time, but this is done with some overhead. Thus,- programmers are 
advised to ensure^ttjat operands ar0 aligned properly, where possible, 
by steps taken at the source level. 
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UNIT ill ACTIVITIES TABLE 



Assassment Idak 



Obtain about a dozen OMR cards. There is a bin with a aign 
"OMR Cards" above it in room MS 09 in the basement. 
Mark OMR cards as directed below, one card per direction. The 
letter "O" is indicated by "0" to distinguish It from zero, 
whleh is just. "0." 

Card 1: Mark the "C0MMENT" box on the card, and mark 

.SAMPLE PR0GRAM beginning in column 1 of the 

card. 

Card 2: Mark the "C0MMENT" box, and mark your name 
beginning in coluam 1. 

Card 3: Mark A«»2*l beginning in coluum 1. 

Card 4: Mark B«2*6 beginning in column 

Card 5: Mark C«-0.6 beginning in coluum 1* 

Card 6: Mark AN-3.0^A+B/(A-C) beginning in coluum 1. 

Card 7: Mark WRITE in the keyword block of the card, 
and then mark (6,4)AN starting in column !• 

Card 8: Mark a 4 in the "unit" column of the statement 
numbers block of the card; mark F0RMAT in the 
keyt^ord block; and then mark (1H0,F10*1) start- 
ing in coluftoi X. 

Card 9 1 Mark ST0P in the keyword block* 

Card 10: Hark END in the keyword block* 
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You will thr@<j^ contiol c ard^ fox running your Job on the 

computer :^JOB, $ENTRY, and $IBSYS- 'Tlxe $JOB card is an 
orange colo^and will be given to you by your instruc\^r\ 
(APPENDIX III, Section B, contains a detailed discussion of 
the control cards » but probably you should save that till 
later.) Make your own $ENTRY and $IBSYS cards by marking 

the $ENTRY box on one card and the $IBSYS box on another 

y 

card. These boxes are located In the upper left center of 
the OMR card. 

Arrange your carde in the following o^der: 
$JOB 

C0MMENT SAMPLE PR0GfeAM 
C0MMENT Your name 

A«»2,l * . 

B"»2 .6 * > 

C-0.6 ^ 
AN"3.0*A+B/(A-C) 

4 F0RMAT(IHt),FlO.l) 
ST0P 
END 

$ENTRY 
$IBSYS 

Go to APPENDIX III, Section A, and take a self-guided tour of 
the Computer Center facilities. 

Go to APPENDIX III, Section C, and follow the directions for 
running a job veiry car(Sfully% ^ , . 
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?♦ Now that you hove mastered the User Terminal and have your 
printod output in hand, check the output for orror or warning 
messages. If you have either or both, then probably you have 
marked your cards Incorrectly or your cards ar© not in th© 
proper order. Check th^t cards carefully, make corrections, 
and try again • If you need help, see your Instructor. 

8. When your computer output contains no errors ana^'iiafl 8.0 
printed as the "answer'' (after $ENTRY), then take it/ and 
your program deck (remove the control cards first) ko your 
instructor. If he approves your work, then you have passed 
; the first hurdle! < 
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UNIT i}2 ACTIVITIES TABLE 



Read Section 4-1, pages 5^60^ of Fortran IV ProRraromlnR for 
Engineers and^^lentiats by Murrlll and Smith, 



\ 



UNIT &3 ACTIVITIES TABLE 

All references are to FORTRAN IV ProRrammlnR for JEaftlneers au^ 
Scientists by Murrlll and Smith. 

. ( ' 

1. Read the Ifitroductlon to Chapter 2 and Sections 2-^1 and 2'=^2, 
pages 17*'21. 

2. Read Sections 2-3, 2-4, and 2-5, pages' 21-26.^ 

3. Read Section 2-6, pages 26-28, and 2-8, pages 30-31. 

4. Work as many of the Exercises, pages 31-35, as you feel 6l need 
for, (Solutions to Exercises marked with a dagger *t are given 
in Appendix E^^page 252.) If you need ^sistance, see your 
instructor. 



) 
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UNIT H ACTIVITIES TABLE 

Reference© are to Fortran IV ProRritomuLnR for Ertfi^lnG©rs and 
Scientists by >fu'rrlll and Smith % ^ 
, 1. Read Section 2-7 > pages 28-30. 
2. Re§d Section 4--2, pages 60-63, 

3* Section 2'-'6, pageei 26-28 discusses atatements of the 
form 

N « N 1 

which is an example of a counter that counts by ones. 
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UNIT J5 ACTIVITIES TABLE 

Jlead Chapter 1, pages l'-16> of Fortran IV FrQRrammlnR for 

Enginee r s and Sclentlstg^ . You^don't nmd, to bother too much 
* 

with all tH© details; try to get tha general ideas. Pay 
particular attention » however, to the discussion and italicisjed 
torms In Sections 1-5 and 1*^* ,Th© concepts of compiling and 
execution are of great Importanco. 

You will need three control carde for running your Job on the 
computer: $JOB, $ENTRY, and $IBSYS. The $JOB card is an orange 
color and will be given to you by your Instructor. 
Read Appendix III, Section B, which tells you more iibout th^ 
control cards. 

The simplest procedure at this point Is for you to punch yojur 
own $EN^ and $IBSYS cards, as described in Appendix Iir, ' 
Section B. 

Arrange your cards in the following order: 

f 




$J0B 



1 



Comment cards 



TRyi«2.1' 
TRY2*2 . 6 
TRy3«0,6 

AN8'«3 . 0*TRY1+TRY2/ (TRY1-TRY3 ) 
WR1TE(6,A)ANS - 
A F0RMAT(lHO»ma) 
ST0P 
WD' 

$ENTRY ' 
$1BSYS . . 
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Ncixt get an "80/80 listing'* your program. Tills listing pro- 
vides a convenient Way of checking your program and control cards 
to make sure that tme cards ar© in the proper ordar and that there 
are no keypunching errors. Read Appendix VI, whldn tells you how 
fco get an 80/80 listing with the user terming. 

Since you have already used the card reader and the line printer 
in UNIT //I, you shquldn^^t have any trouble, if you read the in-- 
St ructions on the wall and do what they say. If you do run into 
problems, read Appendix IV on the card reader and Appendix^ V on 
using th<3 line printer. r ' ' 

Once you get the 80/80 listing, check it for Errors. If there 
are errors, then make the necessary corrections, and get a new 
listing. 

Keep the listing of the correct program, -since you will need it 
later. 

Since you have already run a job on the user terminal in UNIT //l, 
then you may be able to go ahead and run your job without further 
ado. But, if you're not sure what to do, then do and b below. 

a. Do you need to take the self-guided tour again? If so, 
then go to Appendix III> Section A. 

b. Go to Append ixialll, Section C, and v^^-y carefully follow 
the dir^ictlons for running a job. 

When you have th« printer output in hand, examine it for errors. 

If you have either error or warning messages, then you probably 

have not punched your cards correctly or else one or more cards 

\ 
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are out of order. Check thfi cards carefully* Ruilte corrections, 
and try again. If you ne^ ^^^"^ Ittstructor. 

When your computer output contains no errofe'^and has 8.0 print- 
ed ati the "answer" (after $EN1*RY), th®n you are fini..ued, tl you 
have an 80/80 listing of the correct program. Keep th© printed 
output, the listing, and your program deck for th© ae^essment 

V 





UNIT //6 (COMSC) ACTIVITIES TABLE 

I 

Unless otherwise indicated, all text references are to Fortran 
IV ProRratnmlnR for En^ln^ers and Scientists by Murrill and Smith. 

I. Read carefully chapter 3. Study ^ the examples in Figures 
3-2 and 3-3, 

. 2* Complete as many of the exercises at th€ii end of Chapter 3 

(pages SS'-SS) as you feel are necessary .to learn about in- 

put/outpyt using J[> H and 'literal' type conversions. 

. ^ ...... . 

In particular do exercises 3--15 and S'-IB so yoo can check 

• ^ " your results. Be sure to include trial data cards as 

\ stressed iM the italics on page 56, 

To be certain that you understand the materials properly, 

punch .up a complete progrj^ deck iticluding control cards and 

• ^ data for either exercise 3--15 or 3--18 and run it on the com- 

puter. . , 

3, %Iine fields of various widths are punched on the accpmpany-* 

Ing data card. These fields are indicated by the numbers 

1,^ 2, 3, etc. Decimal points-are punched in all -fields' 

whicti conCair)i numbers of type REAL. Fields' which aW to be 

regarded as integer fields do not contain a decimal <point * 
*- ^ ' . ' 

. Prepare a Fortran program (Include documen^tlon) to read 

■< .. ^ ■ ■ - 

and print the data. Write all the Integer numbers first 




under the heading THE INTEGER NUMBERS. Triple splice and 
write the heading THE REAL NUMBERS and the r^ai numbers 
^ under that heading. Separate all fields by two blank columns 
wlion printing. Punch a data card exactly like the one shovm, 
and punch your program. Run the program first on the 360. 
When the output is correct, then run your program on the IBM 
1130, referring to Appendix VII for instructions. Show the 
printed outputs of both computers to your instructor prior 
to requesting the assessment task. 
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UNIT l!8 ACTIVITIES TAB}.E 

All references are to FORTRAN IV ProfirammlnR for Engineers and 
Sclent lata by Murrlll and Sttiith. * 

1. Read Section 4-3, pages 63-66, 

2. Read Section A-A, page 66. 

I 

3. Read Section pages 66-70. 

4. Read Section 4-6, pages 70-72. 

5. Read Sectlpns 4-7 and 4-8, pages 73-77. 




, UNIT if9 ACTIVITIES TABLE 

All references are to FORTRAN IV ProRrangaJlng for Euj^lneers and 
Sclent tst8 by Murrill and Smith > unless stated othen>ri80. 

1. Read Chapter 5, pages 80-97. 

2* Work* problem 5-2, page 98, and check your program by the 
one given on pages 264-265* Run It on the computer if you 
wish. ■ 

"3. Work- problem 5-6 » page 98 » and check your program by the 



) 



one given on page 266. Run it on the computer If you wish. 
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UNIT //lO ACTIVITIES TABLE 



All references are t^o l^ortran IV ProRrattgi^lng for Eaglneero and 
ScienlLiate by Morrill and Smitli; 



1. Read Chapter 6 / pages, 102-118* Pay particular attention to' the 
rules stfited in Sections 6-*3 ami 6-A. 

2. Work problem 6-1, page 118. Run your ptogram on the . compiiiter • 
(One soluclon is shown on the next page.)- 

3« Work problem 6-2 > pag© 118» In addition, to printing b^ and f ) > 
print the coefficients in a clearly labeled format. Use tha • 
^ factored form of a polynoiaial for the calculation. The program 
must be general. Run your program on a computer and show youtf 
printer output to your instructor before you tak© the assessment 
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$JOB COMSG 2H2 

C SELF EVALUATION,'^ ACTIVITY 2. 
C CAidHLATE N FACTORIAL. . * 
C ItJM 360 .WATFIV. 

c ■ '•■ ^ . 

1 • . DATA IN.LP/SU/ * ^ 

2 REAX>(IN,1)N ^ 
5^ 1 F0RMAT(I3) . 

A IF(N)10,11,12 

CAAAAA** ERROR, N IS NEGATIVE. * 

5 10 WRITE (LP, 2)N 

6 ' "l FORMATC N IS NEGATIVE. N - ',13) 

7 STOP 

. C******* N ;S ZERO. N FACTORIAL IS 1. 

8 • li NF*1 I 

9 GO TO 20 \^ 

. .C* ****** N > MRO. CAIXULAtE N FACTORIAL. 

10 12 NF«1. ♦ 

U DO 13 J^ljil , ' 

12 ' NF«Nf'*J - . ..• v.-.- 

13 13 CONTINUE . ■ ... .'^ . 
lA 20 Write (L]^,3)N,TS[F . ■ 

15 3 FORMAT C-N - ',13/' N" FACTOKIAL * ^iO) 

16 STOP - . 1- 

17 END • . r'"'.. ' 

$ENTRY . - • ' ' ' 

N -» 8 

N FACTORIAL « ' 40320 ' 

CORE USAGE . OBJECT CODE- • 5152 BYTES, ARRAY AREA« 

COMPILE TIME« 0.73 SEC, EXECUTION TIME- ' 0.01 SEC 
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mU ni ACTIVrtlES TABLE 



R©f« ranees are to Fortran IV Prog rammlrig^ for EnKlneegrs and Scientists 
by Murrlll and Smith. * 

1. Read Chapter 7, Sections 1-10, pages 137-155. 

2* Work problem 7-3» pages 160--161. Run the program on the computer, 
One solution to th& progratxi 1© given on pages 284-285. 
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UNIT ACTIVITIES TABLE 



■1 



Unlets a specif led otherwise, all text references are to 'FORTRAN 
S^™GM>MING^ FOR SNCINEERS AND SCIENTISTS, bv Murrill and Smith. 

Activity 1: Read Section 2-5, pages 25-26. 

Activity 2: Read the introduction to Chapter 9 and 
Section 9-1, pages 188-190. 

Ac^yity 3: Read Section 9-2, pages 19Q~194. 

-Activity A: Work problem 9-14, page 213. Check your 
results against the ^plution given on 
page 303. 

■'•Activity 5: Read Section 9-3, pages 194-195." \' 

Read Section 9-4, pag©8 195-197. ' " 




/tctlviCy 6: Read Section St-S, pages 197-202. 

Activity, 7: Work the first part of ^23, page 214. 

gheck, yoMr results agalnsit the solution 
■ given" on pagts 306 . . (A v^c^ot "is simply 

.' J . ^ sljjgler-dimenalonal array of numbers; 

>n«ltiply ^ach element of the array by 
a single nuraber, a scalar quantity.) 
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UNIT ifU ACTIVITIES TABLE 

Read the following references in Fortran IV ProRraminlnR for EnRlneerg 
and Sclontlsts by Murrlll and Smith: * 



1* Fltst paragraph of Section 3-5, page 49* 
2. SectT?Rr-5^67pl8es 52=54. 
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UNIT Hd <CQMSC) ACTIVITIES TABLE - ' 

\ 

Road pages 117 to 150 of the book Introduction to Computer 
ScleQca hy Mm K. Rice and John R. Rlce» pybliahod by Holt 
Rlnehart and Winston. 

Reread Chaptef 1» pages 1-16, of Fortran IV ProRraromlnp; for 
Engineer s aad ScJjBj^sts. 
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UNIT 17 ACTIVITIES TABLE 



Read Chapter 10, pages 216-225, In Fortran IV ProRranmlnR for 
Engineers and Sclontista by Murrill and Smith, 
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AMXJfiCETlC, 
COUeBPXS 
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CONOBPXa 
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LOOPS » 10 
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ARRAYS* 9 
SUBSCRIPTED VARIABLES 
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FLOWCilARlS 



IT 




CONDITXCNAL 8 
SMNCHKS 
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WRITE 
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PROGEAM DOCIMMfAf ION 
RUimXHG A SltiLE JOB 



.UNCpMDITlON-^ 
At BMNCWKS 



CONSXASJtS 
VA&3aB3f,BS 

ASSIGNM^X 
STAXaiMTS 
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